Ответы
Ответ дал:
0
Объяснение:
program variant2;
var
a,b,c,y: Integer;
begin
WriteLn('введите значение b');
ReadLn(b);
a:=2*b;
c:=a+b;
if a>b then
begin
WriteLn('вывод: b', b);
WriteLn('вывод: c', c);
end
else
y:= a*b;
WriteLn('вывод: y',y);
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад