Написать программу, которая находит сумму четных, однозначных чисел . Написать программу, которая находит сумму двузначных чисел
Var sum,i:integer; begin i:=2; sum:=0; repeat sum:=sum+i; i:=i+2; until i>9; write(sum); end. var sum,i:integer; begin i:=10; sum:=0; repeat sum:=sum+i; i:=i+1; until i>99; write(sum); end.
спасибо
На каком языке написать?
на информатическом
Паскаль?
да