Предмет: Информатика, автор: 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.

Объяснение:

Похожие вопросы
Предмет: Қазақ тiлi, автор: маша1587
Предмет: Русский язык, автор: vishnevskaya154
Предмет: Русский язык, автор: verbimilana
Предмет: Английский язык, автор: shugyla61