0 1 2 3 4 5 10 11 12 13 14
_____________
Var mas: array [1..10] of integer;
k,i:integer;
begin
for i:=1 to 10 do
k:=0;
readln(mas[i]);
k:=k+mas[i];
writeln(mas[i] ,'+');
write(k);
end.
1.5 кб - 1 страница
вся книга - 300 кб
К существительному и глаголу
Только пробел между const и a надо поставить
<span>const a:array[1..3]of integer=(12,7,58);
тогда правильно </span>