Срочно срочно сделайте в паскале плиз Даны целые числа K и N (N больше 0). Вывести N раз число K. Напечатать те из двузначных чисел, которые делятся на 4 но не делятся на 6
Срочно срочно сделайте в паскале плиз
Даны целые числа K и N (N>0). Вывести N раз число K.
Напечатать те из двузначных чисел, которые делятся на 4 но не делятся на 6
Ответ(ы) на вопрос:
1)var k,n,a:integer;
begin
readln(k,n);
for a:=1 to n do
writeln(k);
end.
2)var a:integer;
begin
for a:=10 to 99 do
if (a mod 4=0) and (a mod 6<>0) then writeln(a);
end.
Не нашли ответ?
Похожие вопросы