Очень просто. Если так не понимаешь то открой Excel и понаходи эти диапазоны и ячейки.
Правильный ответ: B18
2468,6824,4682,2486,2684,2648,6248,6842,2846,2864,6284,8642,8624,8264,8246,8426,8462,4862,4826,4286,4268,4628,4682.
Земляника , малина , яблоко, вишня , смородина
Var chisl:array [1..5]of integer;
i,max:integer;
begin
for i:=1 to 5 do begin
Write(i,'-число='); Readln(chisl[i]); end;
max:=0;
for i:=1 to 5 do begin
if chisl[i]>max then max:=chisl[i]; end;
writeln'max chislo=',max);
end.
Алексей - рыбак, Егор - фермер, Виктор - ветеринар, а Михаил пчеловод.
Живут они так: МЕАВ