tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Соператора repeat напишите
Соператора repeat напишите программу, которая требует у вас пароль, например 111, и если пароль правильный, то печатает сообщение "молодец"!
Anyta15111
2 31.05.2019 23:20
3
Ответы
ibarabol318
02.07.2020 09:47
Program Repeat;
varX: integer;
begin
repeat
Write ('Значение X= ');
Readln (X);
if X <> 111 then
until X = 111;
Writeln ('Молодец!');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Nesnayka228
12.08.2019 05:50
каков человек внутри себя так он и судит обо всём сочинение...
Yanaaa13
12.08.2019 05:50
Решить по информатике составьте программу угадай . программа задумывает случайное число в диапозоне от 0 до 99 после каждой попытки играющего угадать число программа выводит...
n1kitat
27.04.2021 14:08
Заполни пропуски в таблицахОпредели значение переменных Ѕи і после выполнения фрагментапрограммы:а) i:= 0;s:= 0;while i 5 dobegini:= i + 1;s:= s +і;end; ;УсловиеПеременные...
xawodilal
05.12.2020 20:23
Приведите примеры платформ CMS с высоким рейтингом. Напишите почему их рейтинг так высок...
Лисёнок335
05.12.2020 20:31
Как сделать елочку в программе Кумир? (С использовать рисователь ) Заранее...
тимаинна
05.12.2020 20:32
Нужно сделать в программе Excel. Куда, что и как вбивать, ничего не понимаю... Дано действительное число х. Вычислить значение функции на заданном отрезке [a,b]. На каждом...
крут6776
05.12.2020 20:34
ИНФОРМАТИКА ЗА ПУСТОЙ ОТВЕТ КИНУ ЖАЛОБУ ЗАДАНИЕ НА ФОТОГРАФИИ...
Нафаня13371337
05.12.2020 20:48
Есть два простых высказывания: А - «Буква А – гласная»; В - «Тигр – животное травоядное». Составьте сложные высказывания по формулам и определите их истинность....
superpuper90
05.12.2020 20:48
составить блок-схему решения задачи. Есть 5 монет. Одна из них фальшивая (легче, чем другие). Остальные весят одинаково. Как за минимальное число взвешиваний найти эту монету....
olesazato
05.12.2020 20:58
КРАТКАЯ ИСТОРИЯ 3-D МОДЕЛИРОВАНИЯ...
Популярные вопросы
Написать сочинение как я провел лето 10 предложений....
3
Аргументы и контраргементы на тему нуждается ли язык в защите? кто !...
3
Объясните почему не существует натуральных чисел а и б таких что 152а+134б=...
1
Составь верные равенства с числами 480, 60, 360, 80, 420, 6, 70....
1
(2целых35-5/8)/19целых3/4= 9целых2/7*1целую2/5: 13+6целых3/7=...
1
Подобрать по смыслу слова , российский...
3
(х-4)в квдрате - 16 х( 2х -9)в квадрате - 2ч(15+х)в квадрате...
2
Впервой корзине 48 яблок во второй корзине 5/8 количества яблок что в...
3
Разложить на множители 1+cos альфа+sin альфа...
2
Вычислите наиболее простым...
1
varX: integer;
begin
repeat
Write ('Значение X= ');
Readln (X);
if X <> 111 then
until X = 111;
Writeln ('Молодец!');
end.