Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Niktommy
10.09.2020 20:23 •
Информатика
(20 ) написать на pascal фрагмент программы, который запрашивает с клавиатуры положительное число n, до тех пор, пока пользователь не введет верно
Показать ответ
Ответ:
voolll
10.10.2020 11:41
var
n: integer;
begin
repeat
read(n)
until n > 0;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ТвойВраг
07.04.2021 05:05
решить задание программирование С++ на visual studio Описание Операторы повторения. Циклические алгоритмы Объявить массив целых чисел из 1000 элементов. Заполнить...
Katya23232311
12.11.2021 13:51
Проверка условия соответствия текущей координаты выполняет функция?...
ник4824
30.03.2020 18:03
F = A&B V (A&B). постройке таблицу истинности логического выражения...
212629
03.06.2022 14:20
Определите , сколько ячеек входит в блок : A3 : F6...
Danilove5
21.07.2020 19:55
Расскажите про операции над множествами и таблицы истиности для основных логических операций...
Andreyvko1
07.05.2023 22:04
Сколько секунд потребуется модему сообщения со скоростью 2048бит/с чтобы передать цветовое растровое изображения размером 4096на1024 пикселей при условии что цвет...
ЕкатеринкA
07.05.2023 22:04
Сложите два двоичных числа 11010+1101...
мират3
07.05.2023 22:04
Какой объем информации необходим для хранения 6 страниц изображения если битовая глубина равна 4 а разрещаюшая дисплея 1024на256 пикселей...
Петуч
02.01.2022 18:08
Перевести числ 39 в фибоначчиеву систему счисления....
lavika1
14.04.2021 18:44
Выразите в килобайтах: ( и объясните 1024 байта 2(10) байтов 2(13) байтов 2(16) байтов 2(13) битов 2(16) битов...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
n: integer;
begin
repeat
read(n)
until n > 0;
end.