Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
12рок1
11.04.2022 08:33 •
Информатика
Составить программу для паскаля на сравнение двух чисел
Показать ответ
Ответ:
k0tesss
23.06.2020 01:55
Program hren;
uses crt;
var x,y:integer;
BEGIN
writeln('enter your numbers');
readln(x,y);
if x>y then
begin
writeln('the first number is greater');
end else
begin
writeln('the second number is greater');
end;
END.
0,0
(0 оценок)
Ответ:
djgas10
23.06.2020 01:55
Var x, y: integer;
begin
readln(x, y);
if (x = y) then writeln('x = y');
if (x < y) then writeln('x < y');
if (x > y) then writeln('x > y');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ОляМалинка
25.05.2023 04:23
ПАСКАЛЬ ИНФОРМАТИКА Составьте блок-схему алгоритма для решения следующей задачи. ( Pascal) Катет прямоугольного треугольника равен 5 см, а разность между гипотенузой и вторым...
SoloveiG
23.05.2020 09:23
Запиши мантиссу числа и порядок числа 213000000=0,213⋅10(9) Мантисса числа: Порядок числа:...
assel00031
01.04.2020 06:27
Делфи. Разработать проект на основе готовой спецификации, в котором использовать компонент SpinEdit для ввода целых чисел в диапазоне от -100 до +100 и вычисления суммы чисел,...
fserwq
27.10.2021 08:18
(〒﹏〒) 8. Результаты выполнения учащимисяконтрольной работы по математикепредставлены в таблице.[5]6[4]12[3]9[2]1Закончите построение столбчатой диаграммы....
khartsiy
26.02.2023 16:16
C++ Переменной K присвоить номер четверти плоскости, в которой находится точка с координатами X и Y ( XY≠0)....
pollylu12
18.03.2021 18:12
C++ Точка задана координатами X, Y. Определить, находится ли эта точка внутри круга радиусом R с центром в начале координат....
Ananasabricos
20.04.2022 13:23
C++ Найти значение функции, вычисляемое по формуле: при у=cosx^2 0 x 2, иначе y=1-sinx^2...
Kyki510
12.03.2022 20:36
Який фрагмент алгоритму називають неповним розгалудженням?...
ksusha6060606
11.08.2021 16:00
Отметь верные утверждения об алгоритмах Будь внимателен! ОТВЕТИТЬ Исполнитель алгоритма не умеет догадываться и фантазировать Алгоритм — это последовательность действий для...
usurge
24.08.2022 07:59
Создайте проект, в котором вводятся значения элементов табличной величины из разных действительных чисел в многострочном текстовом поле, количество которых не превышает 50,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
uses crt;
var x,y:integer;
BEGIN
writeln('enter your numbers');
readln(x,y);
if x>y then
begin
writeln('the first number is greater');
end else
begin
writeln('the second number is greater');
end;
END.
begin
readln(x, y);
if (x = y) then writeln('x = y');
if (x < y) then writeln('x < y');
if (x > y) then writeln('x > y');
end.