<span>OS/2, AmigaOS, Mac OS, Solaris, Linux и UNIX, Windows, </span><span>Novell.</span>
ЭТО Я!!! это моя тетрадь!
<span>https://yadi.sk/i/Xc7hsqHH3UXsgu
</span>Я не очень разбираюсь в физике и не уверен, что до конца понял задание, но реализовал все формулы, которые у вас написаны в виде графика Excel (g = 10).
Напишите мне, если нужно что-то исправить.
program p;
var x: integer;
begin
writeln("Введите число: ");
readln(x);
if x>0 then x:=x*4 else x:=x*3;
writeln("Ответ: ",x); readln; end.
21211
25•3=75 75-5=70 70•3=210 210-5-5=200