Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
SizovMarina
29.01.2020 12:08 •
Информатика
Составьте программу, которая сравнивает два целых числа введенных с клавиатуры - положительное и отрицательное и выводит положительное число на экран
Показать ответ
Ответ:
superbomber
06.10.2020 20:52
Var a,b:real;
begin
readln(a,b);
if a<0 then
writeln(a);
if b<0 then
writeln (b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
LyVlAr
19.05.2023 02:36
Текстовыми процессорами являются ms word pspad notepad2 openoffice.org writer...
Decabrina6666
16.07.2020 04:53
Паскаль. найти сумму корней квадратных из всех нечетных двузначных чисел...
curtain
15.05.2023 11:19
Текстовыми редакторами являются dpad winrar ms word notepad2 kompozer...
Николь11189
17.08.2021 06:48
Учитель информатики в школе придумал для своих учеников необычное : он записал на листе бумаги буквы алфавита от а до л (исключив ё и й) и соединил их линиями в произвольном...
bedboy777
27.08.2021 21:18
Файл - это: а) используемые в компьютере имя или данных б) поименованная область во внешней памяти в) программа, помещенная в оперативную память и готовая к исполнению...
yulis1929
29.04.2021 15:11
Скільки разів виконається цикл? 3 2 4 5...
kg9191
10.07.2020 04:07
Написать программу, которая вычисляет сумму всех четных трехзначных чисел до 1000 (PascalABC)...
4el2
02.11.2021 05:24
Какой хранения файлов по вашему мнению самый безопасный...
Luchik22
19.11.2020 09:35
Хелп информатика нужно это расставить ( там всего 10 строк, но поместилось 9 на фотке ) ( это паскаль)...
pech228
20.11.2021 15:53
На бесконечном поле имеется лестница. Сначала лестница слева направо спускается вниз, затем поднимается вверх. Высота каждой ступени – одна клетка, ширина – две клетки....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a,b);
if a<0 then
writeln(a);
if b<0 then
writeln (b);
end.