Составить программу на языке Паскаль

10-11 класс

Известна температура больного за 20 дней пребывания в больнице. Можно ли еговыписывать, если для этого требуется, чтобы не менее половины всех дней, когда у негобыла температура ниже 37°, приходилось на вторую половину его пребывания вбольнице?

Tit0va1994 08 марта 2015 г., 5:23:31 (9 лет назад)

Рейтинг

+ 0 -

Хороший вопрос

0 Жалоба

Ответить

+ 0 -

JoeJoe

08 марта 2015 г., 8:18:02 (9 лет назад)

var t:array[1..20] of real;
w,i:integer;
begin
w:=0;
for i:=1 to 20 do
  readln(t[i]);
for i:=11 to 20 do
  if t[i]<37 then w:=w+1;
if w=10 then writeln('Можно')
  else writeln('Нельзя');
end.

Хороший ответ

0 Жалоба Ответить

Ответить

Другие вопросы из категории

Dama5000 / 15 февр. 2015 г., 8:47:54

Наташа набрала текст на компьютере. Текст получился на 12 страниц, каждая страница состоит 24 строк, в каждой строчке 21 символ. Определите информационный

объём получившегося текста в одной из кодировок Unicode, в которой каждый символ кодируется 16 битами.

10-11 класс информатика ответов 2

Fin20062403 / 25 янв. 2015 г., 13:46:07

Помогите написать программу для вычисления примера:

$y=cos(v)* \sqrt[3]{1+ sin^{2}(v+a) } ; v=(a+c)/a*c; a= e^{-c} +c; c=2.35$

Или хотя бы ход решения, какие операторы использовать и т. п.

10-11 класс информатика ответов 1

Ekhomov56rus / 02 янв. 2015 г., 1:35:10

Привет, мне нужна помощь с информатикой. Во вложениях находится фото с задачей, которую нужно решить на паскале. Помагите пожалуйста

10-11 класс информатика ответов 1

2yuliya2 / 28 дек. 2014 г., 8:38:11

Составьте программу которая по введёному числу с клавиатуры возведёт его в квадрат если это данное число будет чётным. (пример Program p1, writeln

итд)

10-11 класс информатика ответов 2

Nasta615243 / 17 дек. 2014 г., 18:20:05

Массивы в Visual Basic.Дан одномерный массив А размерности N.Найти сумму положительных элементов и их количество.Буду очень благодарна

10-11 класс информатика ответов 1

Читайте также

Plomba / 11 янв. 2015 г., 15:10:52

Составить программу на языке паскаль

задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали

10-11 класс информатика ответов 1

Nastenkaslaste3 / 10 авг. 2014 г., 9:02:07

3. Не используя функцию возведения в квадрат, напишите на языке Паскаль наиболее короткие алгоритмы вычисления а) y=x¹° б)y=x¹⁵ или а) y=x^10

б)y=x^15

Постараться использовать минимальное количество дополнительных переменных.

4. Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c. Схема циклического обмена: a ← b ← c. Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.

10-11 класс информатика ответов 1

Виктория2712 / 09 апр. 2015 г., 12:10:54

Составить программу на языке Паскаль.Определите, кратно ли трем значение целочисленной переменной X. Если это имеет место, то выведите на печать

значение Х с соответствующим сообщением, если нет, то выведите на печать "нет".
Помогите, пожалуйста, очень нужно)

10-11 класс информатика ответов 6

Mishapetkevich / 24 янв. 2015 г., 21:59:42

помагите пжл, составить программу на языке ПАСКАЛЬ СОСТАВИТЬ ПРОГРАММУ СОКРАЩЕНИЯ ОДНОМЕРНОГО ЧИСЛОВОГО МАССИВА ПУТЕМ УДАЛЕНИЯ ( ВСЕХ ЭЛЕМЕНТОВ С НУЛЕВЫ

МИ ЗНАЧЕНИЯМИ . ДОПОЛНИТЕЛЬНЫЙ МАССИВ ИСПОЛЬЗОВАТЬ НЕ РАЗРЕШАЕТСЯ ) .........ЕСЛИ МОЖЕТИ ПОЯСНИТЕ СЛОВАМИ ЧТО ДЕЛАЕТ ПРОГРАММА

10-11 класс информатика ответов 1

Alinaagasieva / 09 июня 2014 г., 12:16:49

1) Напишите пожалуйста программу (на языке BASIC) вычисления по длинам двух сторон треугольника и углу между ними длины третьей стороны и двух других

углов.
2)
Напишите пожалуйста программу (на языке BASIC) для определения подобия:
а) двух прямоугольников по двум смежным сторонам;
б) двух треугольников по трем сторонам.

10-11 класс информатика ответов 1

Вы находитесь на странице вопроса "Составить программу на языке Паскаль", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.