Регистрация
Yalcun
20.03.2023 01:48
Информатика
Есть ответ 👍

Scratch программасында қандай блоктарды пайдалана
мыз?​

228
359
Посмотреть ответы 1

Ответы на вопрос:

Shool178
Shool178
4,5(15 оценок)
//прога на pascal`e var a: array of int64; n: longint; i : byte; begin write ('введите кол-во чисел: '); readln (n); setlength (a, n); for i: =0 to n-1 do begin write ('введите ', i+1, ' число: '); readln (a[i]); end; for i: =0 to n-1 do begin writeln (''); writeln ('число ', a[i], ': '); if (a[i] mod 2) = 0 then writeln ('четное') else writeln  ('нечетное'); if (a[i] mod 3) = 0 then writeln ('кратно 3-ем') else writeln ('не кратно 3-ем'); if (a[i]< 10) or (a[i]> 99) then writeln ('не 2-значное') else writeln ('2-значное'); end; end.

Популярно: Информатика