Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
арина1495
22.08.2020 13:44 •
Информатика
Задано произвольное целое цисло . если оно больше 50, то нужно уменьшить его в 2 раза, в противном случае возвести в квадрат. паскаль
Показать ответ
Ответ:
Крутой435678
29.05.2020 04:15
var a:integer;
begin
readln(a);
if a>50 then
a:=a/2;
else a:=a*a;
Writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
newaktau
01.02.2020 15:36
2. Створіть векторний малюнок відповідно до зразка (на фото)1. Заоустіть на виконання програму графічного редактора Drawвикористовуючо інструменти малювання графічних примі.ві...
Innochka098
15.08.2022 08:59
Решите решающая оценка...
Anastasiya21126
04.12.2021 14:23
Переведите целые числа из десятичной системы счисления в двоичную систему счисления: 1) 1025; 2) 512; 3)600....
bettycooper
30.11.2021 04:51
Петрик П яточкін вишикував у рядок слоненят та рахує їх по кожному кольору окремо. Всього буває 8 кольорів слоненят. У рядок вишикувались N (10 Скласти код на Python...
gabbivil
13.02.2021 13:03
Нарушается ли свойство результативности алгоритма, если программа выдает сообщение: «Уравнение корней не имеет»? Нет, такая ситуация может возникнуть, если дискриминант...
BackTiger007
03.05.2021 04:39
Почему IP-адрес самого компьютера отличается от IP-адреса, который показывают сервисы Интернета...
dead11dead
09.02.2021 16:41
8. Что выведет эта программа при а = 4, b = 5 ис = 9? print( a , +b , =, с)9. Исправьте ошибки в операторе вывода,print( с , -b , Е, а )чтобы при а = 4, b = 5 и с = 9 программа...
gamerallgames3457643
23.08.2022 17:38
29. Выполните предыдущее задание при а = -22 и b = 4. А) c = a % b + bБ) c = a // b + aВ) b = a // bc = a // bГ) b = a // b + bc = a % b + aд) b = a % b + 4c = a % b +...
alyonaSidorenk
31.05.2021 04:42
Плотность газа, состоящего из смеси гелия и аргона, равна `rho=2 кг // м ^3` при давлении `p=150` кПа и температуре `t=27^@ C `. Определите парциальные давления гелия и...
ilyavip0412
11.01.2023 14:29
До якого різновиду джерел належить булава...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:integer;
begin
readln(a);
if a>50 then
a:=a/2;
else a:=a*a;
Writeln(a);
end.