1. Скретч
2. Какие смайлы можно использовать, а какие нет
3. Как делать презентации
4. Поведение в интернете
5. Поведение за компом
Var x,y:real;
begin
writeln ('Введите x: ');
read (x);
if x>=1.5 then
begin
y:=SQRT(2*x-3);
writeln('y = ', y);
end else
writeln ('Под корнем отрицательное число!');
end.
Смотрите код во вложении.
1,2, и всё остальное ёмкость