Вот задание по инфе, если вам не трудно, решите мне его пожалуйста. (Мои силы уже иссякли ;( )

1
Комментарий удален
Комментарий удален
Комментарий удален
Комментарий удален
Комментарий удален

Ответы и объяснения

  • KGW
  • умный
2013-12-27T23:43:09+04:00
2.
Program One;
var x,y,z:real;
begin
write('введите три числа);
readln(x,y,z);
if (x>=y) and (y>=z) then writeln(2*x,2*y,2*z) else writeln(x/2,y/2,z/2);
readln;
end.
Надеюсь на лучший ответ и на спасибо:)
Комментарий удален
Комментарий удален