Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Брат220
02.02.2022 05:37 •
Информатика
Вкомпьютер вводятся два произвольных положительных числа a1 и a2 - длины сторон двух кубиков. требуется найти объём кубика, большего по размеру. составьте блок-схему и протокол. исходные данные a1=5 , a2=20
Показать ответ
Ответ:
marinapizdec
10.07.2020 13:27
Var a1,a2:integer;
begin
readln(a1);
readln(a2);
a1:=a1*a1*a1;
a2:=a2*a2*a2;
if a1>a2 then writeln(a1) else
writeln(a2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
milka230614
16.02.2023 06:40
Определите информационный объем (в Кбайтах) брошюры, в которой 10 стра-ниц текста. На каждой странице 32 строки по 64 символа в каждой, использу-ется 8-битная кодировка....
astraelenap01fez
21.07.2020 09:24
Из перечня надо выбрать которые находятся в системном блоке стационарного персонального компьютера...
winforever
09.03.2021 23:53
Чи звичайний інтернет відрізняється від інтеонету речей 2. Які пристрої використовують IoT? 3 Якими є складові інтернету речей? 4 Як можуть взаємодіяти речі між собою...
NastyaZl
15.12.2022 11:52
(x/y-2*sqrt(sqr(x)-4*x*y))/(x+y)+2*x Записать в общепринятом математическом виде...
Dive1
31.03.2022 21:12
Чи викликав у вас твір відчуття гордості за свого земляка?Якщо так,то чому ?Якщо ні,то чому ? Неймовірні пригоди Івана Сили...
Qurin
30.07.2021 12:32
Сделайте вывод о важности элементов экономической инфраструктуры (с дополнительным охватом казахстанского компонента). [3]Сделайте вывод о важности элементов экономической...
nurmakhanovna02
19.08.2022 10:06
Оповідання у якому розповідь велася за роки це..а) Повістьб) Притчав) Літопис...
alexksyx
18.08.2021 03:52
Күн жүйесі. Напишите маленький текст на каз...
даша3649
03.02.2020 04:12
ответьте на главный вопрос интервью.Используйте аргументы в поддержку своего мнения....
ArkhamCity
12.10.2021 02:34
Решите , Кто знает . За ранее ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a1);
readln(a2);
a1:=a1*a1*a1;
a2:=a2*a2*a2;
if a1>a2 then writeln(a1) else
writeln(a2);
end.