Question

. Найти максимальный элемент массива из 10 целых чисел. На языке Паскаль! Помогите.

Answer 1

program Marray;
var arr:array[1..10] of integer;
      i,max:integer;
begin
for i:=1 to 10 do readln(arr[i]);
for i:=1 to 10 do
begin
if arr[i]>max then max:=arr[i];
end;
writeln(max);
end.

Answer 2

вот это почему ? program Marray;

Answer 3

i,max:integer

Answer 4

program Marray; _ это название программы

Answer 5

i,max:integer; _ это блок переменных

Answer 6

спасибо