Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
temnikovay01
04.03.2020 13:15 •
Информатика
Склавиатуры вводятся положительные числа до тех пор пока не будет введено отрицательное число. составить программу, выводящую это число на экран.
Ответ:
ДашаСалина
12.06.2020 02:54
var a:integer;
begin
read(a);
while(a>0) do
readln(a);
wrileln(a)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
victoria223
10.11.2020 21:17
На экране компьютера необходимо получить 512 цветов. какой должна быть глубина цвета?...
katyamineeva02
08.03.2020 14:06
Найди шифр, по которому текст вида красный арбуз закодирован как лсбтоъкбсвфи закодировать их текст автомобиль...
kamillikoryan
08.03.2020 14:06
Струйный принтер за 1 минуту печатает 1 страницу, а лазерный принтер за 1 минуту печатает 5 страниц. известно, что на струйном принтере уже напечатали 20 страниц. после чего оба принтера...
танюша237
16.07.2020 11:48
НАЙДИТЕ ФОРМУЛУ С ОШИБКОЙ, ЗАПИСАННУЮ В ЯЧЕЙКЕ ТАБЛИЦЫ MICROSOFT EXCEL: a.(2/3) b.А2 c.В+А3 d.3 e.2 f.А1/5...
bekbolata45
24.08.2021 18:10
Условие задания Какое значение получит переменная после выполнения алгоритма?х := 2y := 4 + xу :=у + 4у := у * zy:=y+5y:=y*xу := y +6ответ:...
kkhristinka1
13.01.2022 15:07
Нуждаюсь в по информатике :...
Soul9in9the9dream
09.03.2020 18:06
Подскажите ! Как вычислить количество повторений цикла?...
kushtueva
03.10.2021 12:05
Задача 2. Нехай задано натуральне число. Якщо воно ділиться на 6. то потрібно його розділити на 6.Щоб число ділилося на 6, воно повинно ділитися на 2 і на 3.А ознаки подільності на...
prisheplub
23.04.2023 11:34
Составить программу, которая заполняет двумерный массив размерности n*m (n, m≤10 задаются пользователем) случайными целыми числами от 1 до 100, выводит его на экран, а затем меняет...
аноним0000001
13.11.2020 11:13
Напишите письмо людям планеты Земля. Чтобы вы хотели им пожелать от имени Маленького принца. Объем не менее 100 слов, слова просчитайте по десяткам....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a:integer;
begin
read(a);
while(a>0) do
readln(a);
wrileln(a)
end.