Информатика Архивный вопрос

Помогите напсать 2 программу,или любую другую.БУДУ СЕРДЕЧНО БЛАГОДАРНА!

Помогите напсать 2 программу,или любую другую.БУДУ СЕРДЕЧНО БЛАГОДАРНА!
Нет комментариев

Ответы

Гость

Var x, y : integer;
begin
write('введи х: ' );
readln(x);
if x < 5 
 then y := (4*x*x + 1)/(x-5);
 else y := 3*x*x -2
writeln(y);
end

2 комментария:
к 4 задаче тоже вместо алгоритма написал код, до этого в дороге был. смотри другой вопрос
Спасибо огромное

Похожие вопросы