Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
lisafoxxxxxxxx
26.12.2020 02:33 •
Информатика
Паскаль, . сделать так, чтобы программа повторилась несколько раз program z; var x,a,k: integer; begin x: =random(100)+1; repeat writeln('введите число от 1 до 100'); readln(a); k: =k+1; if a> x then write ('> '); if a
Ответ:
maxidro1
16.07.2020 01:20
Repeat ставишь в начало, где нужно повторение
until false в конец
0,0
(0 оценок)
Популярные вопросы: Информатика
24.04.2022 17:40
Какой ученый разработал основы логики?  1.л. пастер  2.дж. буль  3.б. паскаль 4. к. шеннон  5.и. ньютон...
sofira3
24.04.2022 17:40
Сколько байт памяти занимает цветное изображение шириной 10 точек и высотой 100 точек в цветовой модели rgb?...
fizik24
24.04.2022 17:40
Что объединяет почту телефон и радио...
asya343434
24.04.2022 17:40
Сообщение по теме состав объекта компьютер...
2003Саша
17.10.2022 07:26
Можете соединить определение со словами...
nasi
20.05.2021 12:49
На какую цифру оканчивается запись десятичного числа 125 в системе счисления с основанием 6? решите...
Картоон
08.05.2021 21:00
Склавиатуры вводится числа а,в, и целое число х. если х=0, найти разность а-в, 1-а*в, 2-а: в, в противном случае найти сумму....
coldenye
03.08.2020 22:08
Надо. исправте ошибки. program untitled; uses crt; type m=array[1..100]of integer; e= file of integer; var k,t: integer; f,g,h: e; i,n,c,a: integer; begin assign(f, f.dat ); assign(g,...
Scenic1
03.08.2020 22:08
Нарисовать паровоз с колёсами в pascal abs с колёсами через line и cirkle...
skssjsub111
03.06.2021 04:11
На носителе объемом 900 Мбайт размещены изображения, каждое из которых занимает 300 Кбайт. Найдите количество изображений (файлов)....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
until false в конец