решение задачи на цикл в Паскале. Из рядя целых 2-х значных чисел посчитать ТОЛЬКО ТЕ ЧИСЛА, ЦИФРЫ КОТОРЫХ СОВПАДАЮТ, ОТ 10 ДО 99
uses crt;var i,z:integer;beginclrscr;i:=0;while i<100 dobeginif i mod 11=0 then z:=z+i;i:=i+1;end;writeln('Summa= ',z);readln();end.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
uses crt;
var i,z:integer;
begin
clrscr;
i:=0;
while i<100 do
begin
if i mod 11=0 then z:=z+i;
i:=i+1;
end;
writeln('Summa= ',z);
readln();
end.