Вопрос для Илюхи:
ПОМОГИТЕ ПОЖАЛУЙСТА!!!! составьте программу позволяющую вводить с клавиатуры 6 целых чисел и определяющую наибольшее из них. ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!
Илюха-Отвечает:
Паскаль, одномерный массив
var a:array [1..6] of integer; i, max: integer;
begin
for i:=1 to 6 do read(a[i]);
max:=a[1];
for i:=1 to 6 do
if a[i]>max then max:=a[i];
writeln(max); readln; end.