Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ainashsharipov
04.06.2020 21:35 •
Информатика
Pascal abc пишет, что в 5 строке неожиданный символ. ! var p: integer; begin write('введите пароль'); read (p); if p=1998 then write (’молодец’) else write (’пароль не верен’); end.
Показать ответ
Ответ:
1123454321макс
06.04.2020 04:49
Исправленная:
VAR P:integer;
begin
write('введите пароль');
read (P);
if p=1998 then write ('Молодец') else write ('Пароль не верен');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
mihajlovalena45
05.08.2021 12:26
Определите сколько раз выполнится цикл...
1234567890825
05.08.2021 12:26
Составить программу вычисления суммы 17 элементов последовательности каждый элемент вычисляется по формуле : ((2n)^2)+3)/(7n)^3 ответ: 1.4971...
Alexandr201755
10.01.2020 05:38
Скажите что сделать я вожу правильный пороль винды а он пишет неправильный,может что другое надо?...
Pool6914
14.08.2022 08:05
Как перенести те приложения которые не переносятся на карту памяти , такое вообще возможно? ...
Аня276541
14.12.2021 18:01
Завтра надо сыну сдать а я вообще не понимаю в этом. Информатика 1, 2,3 задание. Заранее большое...
Unforgettable77
28.01.2021 04:53
Вычислите значение выражения 9E16 – 9416. В ответе запишите вычисленное значение в десятичной системе счисления. Для выполнения задания 1 необходимо использовать следующие...
KekLol89
11.09.2021 23:52
Є 9 однакових на вигляд монет. Відомо, що серед них є одна фальшива і вона легша за справжню. Складіть блок - схему алгоритму виявлення фальшиво монети найменшою кількістю...
момалог
23.12.2021 17:36
Дан текст с рисунком. Определи, какое обтекание применено.4.pngтекстовой рисунокпо контурувсе ответы верныенад текстом...
sairma
19.05.2020 17:56
Приложение со словом азям, ярмак, бурнус...
TvaylatHale123
19.05.2020 17:56
Always/they/by the lake/make a campfire...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
VAR P:integer;
begin
write('введите пароль');
read (P);
if p=1998 then write ('Молодец') else write ('Пароль не верен');
end.