Предмет: Информатика,
автор: МАРГАНА
Пожалуйста, помогите:
Составить программу паскаль для нахождения суммы двузначных четных чисел.
Ответы
Автор ответа:
1
var
a,s:integer;
begin
a:=9;
s:=0;
while a<99 do
begin
inc(a);
if (a mod 2 = 0) then
s:=s+a;
end;
end.
a,s:integer;
begin
a:=9;
s:=0;
while a<99 do
begin
inc(a);
if (a mod 2 = 0) then
s:=s+a;
end;
end.
Похожие вопросы
Предмет: Русский язык,
автор: janna8789mailru
Предмет: Английский язык,
автор: balabanovich1986iren
Предмет: Английский язык,
автор: 1488sashka1488
Предмет: Математика,
автор: vsmirnov900
Предмет: Химия,
автор: sasha8422