Предмет: Информатика, автор: FGD45

Найти значение всех двухзначных чисел от 10 до 99
Программирование. Информатика.

Ответы

Автор ответа: figyshkin2
1
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.
Похожие вопросы