Найти количество решений системы уравнений

Все в паскале:
1. Формула пути S=V*t,V=S/t;
    Значит программа имеет вид
var s, v, t:integer;
begin
writeln('Введите путь и время');
readln(s, t);
v:=s/t
writeln('ответ: V=', v);
end.
Все остальное по анологии

Во 2 и 3 y:=/формула в условии/ и выводишь у
В 4, воспользуйся формулой площади S=a*b (a и b - ширина с длинной)
В 5 a=P-2*b  (а основание, b бок сторона)
В 7 o=(a+b+c)/3 (о - ср., а, b, c - число в классах)
8.
var a, b:integer;
begin
writeln('Введите числа');
readln(a, b);
writeln('Сумма=', a+b);
writeln('Разность=', a-b);
end.
В 9 как 8, только вместо + и - надо * И /

1. не заходить на вредные ссылки

не переходить на сайты на которые ругается антивирус

не скачивать подозрительные файлы с сайтов

не писать гадости в интернете

2. мальчик неправильно сидит за столом и неправильно мользуется компьютером

ноги должны на 90 градусов стоять на полу, глаза должны быть на растоянии не меньше 50 см от экрана, спина должна находиться на спинке, чтобы сохранять осанку

ВРЕДНО долго сидеть в интернете, слушать громко музыку, ненормативно общаться

НЕЙТРАЛЬНО

ПОЛЕЗНО находиться на сайтах развивающие реакцию

не ну я хз че написать так что третье сам подумай))