Найти сумму всех двузначных чисел, кратных k.Прошу вас, решииииитееее!!!!
только в Pascal обязательно, с блок-схемой, если можете
хотя бы на листке решите, сфоткайте и пришлите
ПОЖАЛУЙСТА!!!!
program zadacha;
uses crt;
var b,k,i: integer;
begin
writeln('vvedi k');
readln(k);
for i:=10 to 99 do begin
IF i mod k =0 then inc(b);
end;
writeln('kol-vo dvuxznachnix chisel kraynix k=');
write(b);
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program zadacha;
uses crt;
var b,k,i: integer;
begin
writeln('vvedi k');
readln(k);
for i:=10 to 99 do begin
IF i mod k =0 then inc(b);
end;
writeln('kol-vo dvuxznachnix chisel kraynix k=');
write(b);
end;