Найдите сумму первых 10 чисел (1 2 3 4 5 6 7 8 9 10) на языке паскаль

karinaklinaeva karinaklinaeva    1   28.08.2019 02:40    0

Ответы
RRuslan619 RRuslan619  03.08.2020 10:23
Var
a: array[1..10] of integer;
k; integer;
Begin
For k:=1 to 10 do begin
Read(a[k]);
s:=s+a[k];
end;
Writeln(s)
Readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика