Определить углы для полета тела для попадания в цель при начальных данных расстояние 10 м, разница высот 2, 5 м, скорость 15 м/с с паскаль или excel

А) операции div и mod работают только с целыми значениями; да. b) если a – целая, а b и c –вещественные, то допустима запись a: =b/c; нет, переменной целого типа нельзя присваивать значение вещественного типа. с) для вещественных переменных обычно применяется тип real; да. d) round(x) - округление до целого, а trunc(x) - отсечение дробной части; да. e) значение 35000 входит в тип integer; да. f) все переменные описывают в разделе var; нет, не все. ещё, например, есть массивы, константы. g) исполнительная часть программы начинается с begin и заканчивается end.; да. i) в операторе read комментарии пишутся в кавычках. нет, если подразумевается, что апостроф это не кавычки. в апострофах (одинарные кавычки).

{у = ах2 – b для х изменяющегося от –7 до +12 с шагом +1.значения а и b ввести с клавиатуры.решить эту с использованием всехвидов циклов (for, while, repeat)}var a,b,x,y: integer; beginwriteln(',я alconafft'); writeln('введи заначения перeменных а и б'); writeln('введи значение а'); readln(a); writeln('введи значение b'); readln(b); writeln('хорошо,теперь протабулируем ф-цию на заданном отрезке,поехали))'); for x: =-7 to 12 do//парметрический циклbeginy: =a*x*2-b; writeln('значение у= ',y,' при х= ',x); end; writeln(' с '); x: =-7; repeatinc(x); y: =a*x*2-b; writeln('значение у= ',y,' при х= ',x); until(x=12); x: =-7; writeln(' с '); while x< 12 dobegininc(x); y: =a*x*2-b; writeln('значение у= ',y,' при х= ',x); end; end.