shugayzhanna6
?>

с задачей на C++. Джоан Роулинг, Гарри Поттер и актер Дэниел Рэдклифф все родились в один день – 31 июля. Одно из любимых времен года - зима Уставшие от необычно теплой зимы, жители Хогвартса решили узнать, действительно ли это самая длинная оттепель за всю историю наблюдений за погодой. Они обратились к синоптикам, а те, в свою очередь, занялись исследованиями статистики за годы. Их интересует, сколько дней длилась самая длинная оттепель. Оттепелью они называют период, в который среднесуточная температура ежедневно превышала 0 градусов Цельсия. Напишите программу синоптикам в работе. Входные данные: Cначала вводится число N – общее количество рассматриваемых дней (1 <= N <= 100 В следующих N строках задается по одному целому числу. Каждое число – среднесуточная температура в соответствующий день. Температуры – целые числа, принадлежащие диапазону от –50 до 50. Выходные данные: Требуется вывести одно число – длину самой продолжительной оттепели, то есть наибольшее количество последовательных дней, на протяжении которых среднесуточная температура превышала 0 градусов. Если температура в каждый из дней была неположительной, выведите 0. Пояснения к примерам: 1) Рассматриваются 6 дней. Самая продолжительная оттепель была на 4-й и 5-й день (50 и 10 градусов соответственно) 2) Самая продолжительная оттепель была в первые 4 дня 3) Дней с положительной температурой не было

Информатика

Ответы

katushak29
 const nx = 20;
var x: array[1..nx, 1..nx] of integer;z:array[1..nx*2] of integer; 
i, j, k,n,r,t: integer; 
begin 
Writeln('Введите размер матрицы n');Read(n); 
 for i := 1 to n do begin   
for j := 1 to n do begin   
Read(k);x[i, j] := k;  end;end;   
Writeln('Исходный массив'); 
for i := 1 to n do begin   
for j := 1 to n do begin     
Write(x[i, j]:4);     
if x[i, j]>0 then begin t:=t+1; z[t]:=x[i, j];end;    
end;   
Writeln;  end; 
Writeln;Writeln('Одномерный массив'); 
for j := 1 to t do     
Write(z[j]:4); 
 end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

с задачей на C++. Джоан Роулинг, Гарри Поттер и актер Дэниел Рэдклифф все родились в один день – 31 июля. Одно из любимых времен года - зима Уставшие от необычно теплой зимы, жители Хогвартса решили узнать, действительно ли это самая длинная оттепель за всю историю наблюдений за погодой. Они обратились к синоптикам, а те, в свою очередь, занялись исследованиями статистики за годы. Их интересует, сколько дней длилась самая длинная оттепель. Оттепелью они называют период, в который среднесуточная температура ежедневно превышала 0 градусов Цельсия. Напишите программу синоптикам в работе. Входные данные: Cначала вводится число N – общее количество рассматриваемых дней (1 <= N <= 100 В следующих N строках задается по одному целому числу. Каждое число – среднесуточная температура в соответствующий день. Температуры – целые числа, принадлежащие диапазону от –50 до 50. Выходные данные: Требуется вывести одно число – длину самой продолжительной оттепели, то есть наибольшее количество последовательных дней, на протяжении которых среднесуточная температура превышала 0 градусов. Если температура в каждый из дней была неположительной, выведите 0. Пояснения к примерам: 1) Рассматриваются 6 дней. Самая продолжительная оттепель была на 4-й и 5-й день (50 и 10 градусов соответственно) 2) Самая продолжительная оттепель была в первые 4 дня 3) Дней с положительной температурой не было
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

potemkin77
galinazajceva781
Александрович Василий
vallihhh
vkurnosov20008
Garifovich Greshilova791
ars-trushakova
poch23420
falileevas
ramzaev09
Yevgeniya Bessonov
Yevgenevna
impuls20125948
dariagromova54
Natalya