var t: array[1..7] of integer;
maxi,mini:...;
begin
writeln('Введите температуры за неделю ');
for var i:=1 to 7 do readln(...);
maxi:=1;
for var i:=2 to 7 do
if t[i]>t[maxi] then maxi:=..;
mini:=1;
for var i:=2 to 7 do
if t[i]<t[mini] then mini:=...;
writeln('Макс. темп. ' ,t[maxi], ' в ', ... ,' день' );
writeln('Мин. темп. ' ,t[mini], ' в ', mini, ' день' );
writeln(t[maxi]-t[...]);
end.
СОСТАВЛЯЕМ ПРОГРАММЫ
Задание 2. Составьте программу, которая будет находить разность максимальной и минимальной температур.
Задание 4. Составьте программу, которая считает количество дней с максимальной температурой.
Задание 5. В массиве хранится информация о стоимости автомобилей. Определить стоимость самого дорогого автомобиля и его номер в массиве. Если есть несколько таких автомобилей, то выведите все номера. Количество элементов массива и сами элементы массива ввести с клавиатуры.
Комментариев нет:
Отправить комментарий