tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
З ясувати чи число а кратне 5.
З'ясувати чи число а кратне 5. відповідь вивести у вигляді yes/no
savoian82ozq31t
3 21.07.2019 03:30
0
Ответы
Marattadjibov73
23.09.2020 01:52
Var a:integer;
begin
write('a='); readln(a);
if a mod 5 = 0 then writeln('Yes') else writeln('No');
end.
Пример:
a=15
Yes
ПОКАЗАТЬ ОТВЕТЫ
andriymoskalet
23.09.2020 01:52
// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
var a:=ReadInteger('n=');
if a mod 5=0 then Writeln('Yes')
else Writeln('No')
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
9102936435
16.02.2022 19:07
Угадайте правильное шифрование и запишите правильные слова. Никчисто,Еперадач,Никемпри, Ниофмрцаяи...
dimaonisko
16.02.2022 18:49
1. Нарисуйте блок-схему про- граммы. 2. Что выполняется в коде и каким будет результат выпол- нения программы? 3. Напишите программу с использованием оператора...
diankaa55
26.09.2019 18:11
Участок электронной цепи состоит из . необходимо определить эквивалентное сопротивление всей цепи, силу тока и напряжение на каждом ....
12235110spl
26.09.2019 19:20
Чи шкодить компютеру велика кількість браузерів, які завантажені на нього ?...
Юриякамория
26.09.2019 18:13
Ть будьласка! написати прислів я на азбуці морзе....
artemchurkin
12.05.2020 13:30
1) Чи можна висловлювання «Київ – столиця України» розглядати як логічний виразТакНі 2) var x, y, z : Integer; A, B, C : Boolean; Які оператори присвоювання допустимі?...
Vity144
27.06.2019 06:40
Вот училка задала на отработку по программированию на паскаль ! решите : ) дано целое число. определить, является ли оно кратным 5 и 10...
tyoma2223333
27.06.2019 06:40
Составьте программу вычисления суммы тех элементов одномерного массива a (n),что одновременно встречаются в массиве b (n)...
Yuriy2007
27.06.2019 06:40
Дан массив b,состоящий из 15 элементов значения которого вводятся с клавиатуры. подсчитать сколько элементов массива положителлных и четных...
Pravednick
08.09.2019 21:50
Какую информацию о веб-странице собирает поисковый робот?...
Популярные вопросы
VARIANT 19I. ReadingRead the text given below. Decide if the...
2
Дано точку М(-3;5). Установіть відповідність між геометричними...
2
Подати у вигляді многочлена вираз (4+у)2...
3
Тест по химии сделать 29-31 во...
3
Если Римлянин говорил что он родился в 700 году что это значило...
2
Двачерам хай по-братски Найти площадь поверхности шара и его...
2
Вкажіть метали, які заміщують метал у солі: а) магній б) мідь...
3
у вас есть какая-нибудь информация по этой иконе?...
2
Внутренний угол правильного n-угольника равен 135°, а сторона...
2
Укажіть формулу кислотного оксиду: а)AgOH б)K2O в) Al2O3 г)Р2О5...
2
begin
write('a='); readln(a);
if a mod 5 = 0 then writeln('Yes') else writeln('No');
end.
Пример:
a=15
Yes
begin
var a:=ReadInteger('n=');
if a mod 5=0 then Writeln('Yes')
else Writeln('No')
end.