Предмет: Информатика, автор: bunyyyyyy112

Напишите программу на языка Pascal.

Приложения:

Ответы

Автор ответа: yasha20053
1

Ответ:

program Hello;

var x, y: Real;

begin

writeln('Введите число x');

read(x);

if x<1 then begin

y:=5*x+2;

end

else begin

y:=sin(x);

   end;

   writeln(y);

end.

Объяснение:

Похожие вопросы
Предмет: Английский язык, автор: Ерасыл123
Предмет: Английский язык, автор: shugyla61