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.  В массиве хранится информация о стоимости автомобилей. Определить стоимость самого дорогого автомобиля и его номер в массиве. Если есть несколько таких автомобилей, то выведите все номера. Количество элементов массива и сами элементы массива ввести с клавиатуры. 
 
Комментариев нет:
Отправить комментарий