Опубликовано 08.06.2017 по предмету Информатика от Гость >> <<

Найти сумму всех двузначных чисел, кратных 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);

end;