Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
velikayadasha
15.02.2023 15:05 •
Информатика
Напиши те программу в паскале : даны x и y .если x> y то число заменить их квадратами .в противном случае число удвоить . надо
Показать ответ
Ответ:
Lolololololololol4
04.10.2020 05:50
Var
a,b:integer;
begin
readln(a,b);
if a>b then
begin
a*=a;
b*=b;
end else
begin
a+=a;
b+=b;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
980sveta
29.03.2023 01:37
Укажите то место, где можно увидеть название выбранной текстуры....
sergeenkoandre
23.01.2021 19:06
Исправь ошибки в программе.укажите их число program a; const x:50; c:1000; var SUM,pr,d : integer; begin sum:= x+c; writeln( sum); pr := X*c; writeln (pr); d:=x/c; writeln (d); end....
allapogorelayaoxd0fz
08.02.2022 18:17
Pzhzh reshite budu blagodaren...
oksanastrilets
23.09.2022 13:30
2 Определить сумму налога на имущество по следующей схеме: если стоимость имущества меньше 850 минимальных зарплат (далее – мин.зар.пл.), то налога нет, если до 1700 мин.зар.пл.,...
микадо1
04.11.2022 20:10
Просмотрите данные программы, сформулируйте задачи, которые они реализуют. program z4; var a,k,s:longint; begin writeln( Введите число ); readln(a); s:=a; while s 9 do begin k:=s;...
AmyDay123
10.01.2020 23:46
, с задачкой на Python! Назовём натуральное шестизначное число N (100000£ N £ 999999) счастливым, если суммадвух его первых цифр больше суммы остальных четырёх. Найдите количество...
натаха37
06.05.2020 23:31
Выполнить сложение 7,4+6,8; 9,6+4,25; 1,2+13,84; 1,4+2,8; 0,382+0,612; 12,61+26,137; 4,5+12,319; 0,326+0,7...
anna1082002
30.08.2020 17:45
Сгрупируйце i запишыце прикладу так каб яны указывали а)на не неафiцыйныя абставiны; б) афiцальныя абставiны. у гасцях, на вулицы, ушколе, на перапынку , на класнай гадзiне,у кино...
aygun256
22.05.2023 12:51
Пословица про: согласие и в семье- в доме. вставить нужные слова...
КсюшаКотW
23.12.2020 07:10
Можно ли поставить знак равенства между понятиями «личность», «человек», «индивидуальность»? обоснуйте свой ответ, не менее 2-х аргументов, сделайте самостоятельный вывод....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,b:integer;
begin
readln(a,b);
if a>b then
begin
a*=a;
b*=b;
end else
begin
a+=a;
b+=b;
end;
end.