Составьте программу выводящую ** экран кубы чисел от 3 до 10 включительно Даны...

0 голосов
88 просмотров

Составьте программу выводящую на экран кубы чисел от 3 до 10 включительно Даны натуральные числа от 12 до 25 . Вывести на экран те из них , которве при делении на 6 дают остаток 2 или 5 СРОЧНО НУЖНА ПОМОЩЬ


Информатика (21 баллов) | 88 просмотров
Дан 1 ответ
0 голосов

1)

//PascalABC.NET v3.3 1633

begin

for var i:=3 to 10 do

 writeln(i+'^3 = '+Power(i, 3));

end.


2)

//PascalABC.NET v3.3 1633

begin

for var i:=12 to 25 do

 if (i mod 6 = 2) or (i mod 6 = 5) then

   writeln(i);

end.

(4.3k баллов)