Ввести три действительных числа x, y, z . Вычислить q,w поформулам:q = max(x ⋅ y ⋅ z, 3⋅...

0 голосов
113 просмотров

Ввести три действительных числа x, y, z . Вычислить q,w поформулам:q = max(x ⋅ y ⋅ z, 3⋅ z ⋅ x, 2⋅ (x + y + z));w = min(3⋅ x ⋅ y ⋅ z , q/ 2). Вычисленные значения выдать на печать


Информатика (59 баллов) | 113 просмотров
0

нужно решить в программе паскаль,пожалуйста помогите

0

Что означает символ "⋅"?

0

Определить делится ли на целое число x целое число y без остатка.Если делится, то разделить x на y и вывести его.

0

Давай

0

спапсибо,а можешь еще помочь моему другу,я тебе пришлю?

0

выручи пожалуйста

0

так было в задании,я скопировал все как было

Дан 1 ответ
0 голосов

Program z1;
var
q,x,y,z,a,b,c,d,e:integer;
w:real;
begin
writeln('Введите x');
readln(x);
writeln('Введите y');
readln(y);
writeln('Введите z');
readln(z);
a:=x*y*z;
b:=3*z*x;
c:=2*(x+y+z);
d:=max(a,b);
e:=max(b,c);
q:=max(e,d);
writeln('Максимум',q);
w:=min(3*x*y*z,q/2);
writeln('Минимум',w);
end.

Получилось немного сложнее, чем я ожидал. :)
Если что-то непонятно, пиши. :)

(318 баллов)
0

Отлично :)

0

В лс напишу

0

Да

0

сможешь решить эти две?

0

Не то написал

0

program z1;

0

Вычислить X = max(a + b + c, a + b − c ,min(a ⋅b,2⋅ a ⋅ c))

0

все получилось!!!

0

спасибо,я тебе потом еще одну отправлю задачу

0

хорошо жду