Помогите! Надо составить задачку на языке пасхалия. Вычислить сумму всех нечетных двухзначных чисел
Answers & Comments
bgatovigor
Program prog; var s,i:integer; begin i:=0; s:=0; for i:= 10 to 99 do begin if i mod 2 = 1 then s:=s+i; end; writeln('Ответ ',s); end. И язык называется не пасхалия а паскаль!
Answers & Comments
var s,i:integer;
begin
i:=0;
s:=0;
for i:= 10 to 99 do begin
if i mod 2 = 1 then
s:=s+i; end;
writeln('Ответ ',s);
end.
И язык называется не пасхалия а паскаль!