(Паскаль) Найти сумму между квадратом большего и кубом меньшего из двух чисел. (Составьте программу)
264
419
Ответы на вопрос:
var a,b: real;
begin
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
write('Сумма между квадратом большего и кубом',
' меньшего из чисел ',a,' и ',b,': ');
if (a<b) then writeln(b*b+a*a*a)
else writeln(a*a+b*b*b);
end.
##
var s := ReadString; // ввести строку
s := s.RegexReplace('а\b','');
s.Print
Популярно: Информатика
-
ученик152301.01.2020 04:09
-
КираГум10.08.2022 17:54
-
alinamensikova02.06.2022 21:17
-
Лара151225.05.2021 20:59
-
Diankao4ka30.06.2021 02:36
-
sitnikova0331.10.2022 20:20
-
Subina0010.04.2023 21:11
-
cracavica21122019.10.2020 18:20
-
calusiker28.06.2021 11:38
-
zyryanovairina21.09.2022 10:47