Срочно очень надо срочно пожалуйста помогите Решить задачи: 1.»С клавиатуры вводим гипотенузу и катет. Найти второй катет» 2.»Вычислить стоимость покупки со скидкой: общая цена покупки А руб., скидка С %»

Вопрос школьника по предмету Информатика

Срочно очень надо срочно пожалуйста помогите

Решить задачи:
1.»С клавиатуры вводим гипотенузу и катет. Найти второй катет»
2.»Вычислить стоимость покупки со скидкой: общая цена покупки А руб., скидка С %»

Ответ учителя по предмету Информатика

Ответ:

Ниже

Объяснение:

1.

program qq;

var a, b, c: float;

begin

read(c, b)

a := sqrt(sqr(c) — sqr(b))

writeln(a)

end.

2.

program qq;

var a, b, c: float;

read(a, b)

b := b/100

c := a * (1 — b)

writeln(c)

end.

Вроде так, не суди строго, на паскале года 1.5 ничего не делал.