Предмет: Информатика,
автор: FGD45
Найти значение всех двухзначных чисел от 10 до 99
Программирование. Информатика.
Ответы
Автор ответа:
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.
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.
Похожие вопросы
Предмет: Биология,
автор: imirbakievagula09
Предмет: История,
автор: pokemonkg087
Предмет: Русский язык,
автор: arinpurin79
Предмет: Математика,
автор: bars24
Предмет: Математика,
автор: Krisstinka111