Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
M4xL1ght
04.10.2022 22:13 •
Информатика
Даны 2 действительных числа.возвести в квадрат те из них,значение которых неотрицательны.числа вводятся пользователям с клавиатуры.результат работы программы вводится на экран
Показать ответ
Ответ:
kot289
28.09.2020 16:33
Var
a,d,f,g: integer;
begin
readln(a,d);
if a>0 then begin f:=sqr(a); writeln(f); end;
if d>0 then begin g:=sqr(d); writeln(g); end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
илья1972
20.10.2021 03:46
Если досье на преступников 45 мегабайт и каждое из них имеет объём 12 страниц(48 строк по 64 символа в каждом,1 символ занимает 8 бит),то число досье равно: варианты ответов: 1280,3840,1250,1560,1024....
aizmesteva
20.10.2021 03:46
Вбиблиотеке 16 стелажей с книгами на каждом стелаже 6 полок.какое количество иформации содержит сообщение о том что книга находится на второй полке 5 стелажа...
вадимм2
07.04.2023 05:05
1.для чего папки и каталоги? 2.если не создавать каталоги,то каким образом будут размещены файлы?...
Groverr
03.10.2020 05:34
Все переменные в задачах вводить через input. Не забудь конвертировать их в численный тип Python1. Первый дом имеет a этажей и каждый этаж имеет высоту b сантиметров. А второй дом...
kirill4389
23.02.2020 06:21
Укажите циклическую конструкцию, в которой заранее известно точное число повторений тела цикла. Оцикл с постусловием Оцикл с предусловием Оцикл с параметром...
KarinkaChernov
18.02.2021 15:29
Решите (111001↓2+AF↓16):4↓8...
Топовая20171
14.03.2021 21:43
Написать структурированную программу и доказать ее правильность по определению семантики структурированных программ. Проверить, можно ли в пятеричную запись числа х вставить цифру...
verenikinaulia
04.10.2021 10:53
Прргу постройте график функции: а) у = х2 - 2х + 3; б) у = -x2 + 2x – 1.в каждом случае укажите: 1) при каком значении х функция принимает наименьшее (наиболь-шее) значение; 2) промежутки...
MaksN1203
10.02.2021 09:07
491. знайдіть координати і довжину вектора с, який дорівнює а +ь,якщоа) а (2; -9), 5 (6; 3); в) а(-1; 5), 5(1; -5).б) (0; 4), (-3; 0); ...
altynai0504
08.06.2023 16:02
Красным цветом обозначьте на карте(любой карте) области, нарушающие проявление широтной зональности...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,d,f,g: integer;
begin
readln(a,d);
if a>0 then begin f:=sqr(a); writeln(f); end;
if d>0 then begin g:=sqr(d); writeln(g); end;
end.