Помогите пожалуйста!!!!!! Нужно написать программу которая определяет ПРОИЗВЕДЕНИЕ ВСЕХ ЧИСЕЛ КРАТНЫХ 6 И ЗАКАНЧИВАЮЩИЕСЯ НА 4
в последовательности?
Var i,n:integer;beginwriteln('Введите кол-во чисел!');readln(n);for i:=1 to n dobeginif (i mod 6=0) and (i mod 10=4) thenwriteln(i);end;end.
var i,n:integer; begin writeln('Введите кол-во чисел!'); readln(n); for i:=1 to n do begin if (i mod 6=0) and (i mod 10=4) then writeln(i); end;end.
Он все в строчку дает...
умник, таких чисел бесконечно много, хотя тут наверное имелась ввиду последовательность