Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Gvgvv
09.06.2020 23:00 •
Информатика
Program lala; var a: integer; begin; read(a); if a mod 2 =0 then; writeln(a)('чётное число') else writeln (a)('нечётное число'); end. появляется ошибка встречено 'else', а ожидалось '; '
Ответ:
bukshtanovich20
21.08.2020 01:36
Поправил
Program lala;
var a:integer;
begin
read(a);
if a mod 2 =0 then
writeln(a,' Чётное число')
else writeln (a, ' Нечётное число');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
M1N1G4M3R1
09.05.2021 20:28
Организуйте ввод/вывод данных и запрограммируйте алгоритм вычисления следующего выражения:...
gulnarakazimov
07.09.2022 17:00
Сколько мегабайд займёт фотография 1024 умножить на 2048 (цветов 4096)...
rudenkovitalik
24.05.2022 09:31
Игра «finecraft» требует для установки на жёсткий диск 2 гбайт свободного места. на жёстком диске сейчас 700 мбайт свободного места. а) какое пространство необходимо...
eduard22222
20.02.2022 04:10
Определите, какое из указанных имен файлов удовлетворяет маске: ? * выберите один из 4 вариантов ответа: 1) dad1 2) dad22 3) 3daddy 4) add444...
20736
11.05.2021 16:32
Какое количество информации в байтах можно передать через канал связи за 20 секунд если его пропускная Кб в секунду...
лолодоидтд
27.08.2021 14:01
SOS Надо решить задачу. От двух пристаней навстречу друг другу одновременно отправились два катера и встретились через 1.5ч. Скорость одного катера 28.3 км/ч. Найдите...
kirillovmatvey
27.08.2021 14:01
Яку масу спирту потрібно нагріти з пропановою кислотою, якщо при цьому утворилося 10,2г етилпропаноату?...
olenkayatsev
27.08.2021 14:01
2х в квадрате-32=0 решите уравнение...
Dfh32
27.08.2021 14:01
До ть підкреслити прийменники в 3 завданні....
olgagk1
27.08.2021 14:01
Природа какой зоны нуждается в бережном отношении и почему??...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Program lala;
var a:integer;
begin
read(a);
if a mod 2 =0 then
writeln(a,' Чётное число')
else writeln (a, ' Нечётное число');
end.