Найти значение всех двузначных чисел от 10 до 99

famapsix2015 famapsix2015    2   25.09.2019 18:30    2

Ответы
natalka30112000 natalka30112000  08.10.2020 19:03
Program p1;
var   i,n,a:integer;
begin
n:=99;
a:=10;
for i :=10 to n do 
begin 
a:=a+i; 
end; 
writeln(a); 
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика