1. Информатика
  2. Задача Pascal. Ввести

Задача Pascal.
Ввести число с клавиатуры,если это число кратно 8 и кратно 10,то вывести в ответ Yes, иначе No

flexELITE3 flexELITE3    1   13.05.2020 18:53    2

Ответы
ZevsGromov ZevsGromov  14.10.2020 17:27

Var N:Integer;

begin

read(N);

if (N mod 8 = 0) and (N mod 10 = 0) then

write('YES')

else

write('=NO') ;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
poly77 poly77  21.05.2019 11:50
ответьте на вопросы: 1= почему форму представления звука в компьютере можно называть дискретной и цифровой? 2= что такое цап и ацп? 3= какие элементы звуковой карты отвечают за...
innalemesh1 innalemesh1  06.10.2019 19:20
Як можна додавати, видаляти та переміщувати рядки і стовпці таблиці?...
антонl антонl  06.10.2019 18:24
Объясните, , работу программы program_qqq; var dat: array[1..10] of integer = (70, 80, 90, 40, 40, 70, 80, 90); var s: = 0; var m: =0; writeln( s m k dat[k] ); for var k: = 1...
плрол плрол  06.10.2019 18:23
Даны три числа,верно ли,что одно из них является средним арифметическим двух других. нужно решить на языке c++...
Zahardenicuk Zahardenicuk  20.09.2019 01:20
Чему равно значение переменной b после выполнения фрагмента программы a: =12; b: =-4; b: =5*a-b;...
Shkolяr Shkolяr  20.09.2019 01:20
Что будет выведено на экран в результате выполения следующей программы var a,b,c: integer; a: =-15; a: a*2+1; b: =-a; c: =b mod 2; writeln (c=,c); end...
Маша2005051 Маша2005051  20.09.2019 01:20
Выберите правильное обозначения имен переменных a)cl; b)6xrl; c)123; d)ddd; e)сумма. f)primer; g)целый; h)real; i)del45;...
DiMOn4iK25 DiMOn4iK25  20.09.2019 01:20
Извините что это не вопрос по информатике но ! как объяснить человеку как делать презентаций? ? я просто не знаю как объяснить, я не учительница информатики если я хочу подруге...
RILIR RILIR  08.12.2020 11:51
Расшифруйте зашифрованное сообщение. Для этого:  Ознакомьтесь с алгоритмом шифровки. Продумайте и запишите алгоритм расшифровки. Расшифруйте сообщение по составленному вами...
НастяНевьянцева НастяНевьянцева  08.12.2020 11:51
Какое количество ячеек в диапазоне А2:С4 (один правильный ответ) * 96124​...

Популярные вопросы