Очень нужно =((Ребят, как сделать, чтобы..Например чисел 10Каждое второе (по порядку) выводить (да)Каждое четвёртое (по порядку) выводить (нет)
(язык паскаль)

Есть ответ
17.12.2022
343

Ответ


var a:array [1..10] of integer; i:integer;begin for i:=1 to 10 do read (a[i]); for i:=1 to 10 do if i mod 4 =0 then write ('нет',' ') else if i mod 2=0 then write ('да', ' ') else write (a[i],' ');end.

 

вот вставьте, если не работет напишите


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.