Есть ответ 👍

(Паскаль) Найти сумму между квадратом большего и кубом меньшего из двух чисел. (Составьте программу)

264
419
Посмотреть ответы 2

Ответы на вопрос:


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


Составьте программу, которая удаляет в строке s те буквы а, которые являются последними буквами сл

Популярно: Информатика