tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Паскаль: дано число, превышающее
Паскаль: дано число, превышающее 99. определить, заканчивается ли это число цифрами 55. если число оканчивается цифрами 55 вывести "yes", в противном случае - вывести "no" примеры: входные данные выходные данные . yes
Фприт
2 12.09.2019 01:20
19
Ответы
Есения816
07.10.2020 08:40
Var a: integer;
begin
write('Введите число:');
readln(a);
if (a mod 100 = 55) then
writeln('YES')
else
writeln('NO');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
nataliyantonov
17.05.2020 18:57
Напишите программу, вычисляющую значение у по формуле...
mastervydy
04.08.2019 15:40
По информатике 3кл. объект платье свойства объекта пример: объект тетради 1в клетку 1число листов 2вбольшую клетку 2цвет обложки 3.в косую линию 3цвет листов 4.общая...
Zanaar
04.08.2019 15:30
Сравнить обьекты и записать их признаки. баклажан и болгарский перец...
Evangelins
04.08.2019 15:30
Сключа ра де ки мо ну ля закодировать пословицы: а) рыбак рыбака видит издалека б) сделал дело - гуляй смело...
hameleon5
04.08.2019 15:30
Возникновение системы счисления . ( краткий доклад , ) . минимум 25 предложений ....
Лёха12339
04.08.2019 15:30
записать четверостишье и написать сколько содержит информации в байтах если 1байт -8бит...
OшUb0чkA
04.08.2019 15:30
Впрограмме паскаль! c клавиатуры вводятся 2 числа найти квадрат 1 числа , корень 2 числа, разность квадрата и корня из эих чисел...
оля1874
04.08.2019 15:30
2неизвестная степень _ кбайт = 2 степень неизвестно байт = 2 в 10 степени бит...
кйф5
04.08.2019 15:30
Заполните пропуски гбайт==2621440 кбайт...
nadia291
04.08.2019 15:30
Program zadacha1; var a,b,c,p,s: integer; begin readln(a,b,c); p: = (a+b+c)div 2; s: = sqrt(p*(p-a)*(p-b)*(p-c) ); writeln(s); end. в чем проблема?...
Популярные вопросы
для нагревания льда на 15 градусов потребовалось количество теплоты...
3
Три текстовых вопроса на тему прямая речь...
1
253+x= 362 решить значение выразу...
3
5. Озаглавьте текст, заполните пропуски в нем. В первой трети XVII...
1
Диагонали ромба пересекаются в точке , ∠ равен 46°. Найдите углы...
3
сделать синтаксический разбор предложений 1. Школа знаходзілася...
2
Найдите множество точек координатной плоскости, которое задано...
3
A Who s that? B It s William Shakespeare.A Whywas_ he famous?B...
3
решите очень ,расставить запятые и буквы Ноч(?) выпала ветре(н,...
3
1Почему кондиционеры обычно располагают под потолком, а не вблизи...
1
begin
write('Введите число:');
readln(a);
if (a mod 100 = 55) then
writeln('YES')
else
writeln('NO');
end.