Это ! 50б запиши программу на языке паскаль для: y= 1)0,если x ≤ 0 ; 2)x,если если 0 < x ≤ 1 ; 3) x"2(икс квадрат),если x > 1. (y: 3: 0) запусти программу и введи значение x=13. число выведенное на экран полностью писать не обязательно, просто выведенное число на экран

Kola2004kola Kola2004kola    3   23.09.2019 08:40    0

Ответы
VladDzundza VladDzundza  01.09.2020 22:19
Var x,y: integer;
begin
readln(x);
if x<= 0 then y:=0 else
if x<=1 then y:=x else y:= sqr(x);
Writeln(y);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика