Нужно внести изменения в программу, чтобы n показывало - вопрос №31319485 от karen781 03.02.2021 01:30

Question

Информатика: Нужно внести изменения в программу, чтобы n показывало количество чисел, кратных 3.

karen781 · Answer

Var a, b, n:integer ;BeginA:=10;B:=33;N:=0;While a =b do begin If a mod 3=0 then begin Write( a= , a) ; N:=n+1; End; A:=a+1; End;Writeln( n= , n) ;End....