Впаскаль. 1.с клавиатуры вводятся два числа а и в. меньшее из этих чисел заменить их полусуммой, а большее удвоенным произведением. 2. введены 3 числа, найти наибольшее.

fiyyk fiyyk    1   25.06.2019 13:00    0

Ответы
marinapizdec marinapizdec  02.10.2020 11:14
Первое: 
Program nechet;
var a,b:real;
begin
readln(a);
readln(b);
if a<b then 
writeln('Первое число=',(a+b)/2, ' Второе число=', (a*b)*2)
else 
writeln('Первое число=',(a*b)*2, ' Второе число=', (a+b)/2)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика