СРОЧНО!ПОМОГИТЕ ПОЖАЛУЙСТА❤️ СПАСИБО❤️ 2 задание
СРОЧНО!ПОМОГИТЕ ПОЖАЛУЙСТА❤️
СПАСИБО❤️
2 задание
Гость
Ответ(ы) на вопрос:
Гостьprogram x;
var a, i, b:integer;
Begin
a:=10;
b:=0;
for i:=1 to 10 do begin
if (a mod 2)=1 then b:=b+a;
a:=a+1;
end;
write(b);
End.
Не нашли ответ?
Похожие вопросы