Question

Написать программы в Паскале.
1) нахождение периметра и площади треугольника
2) найти произведение четных числе от 10 до 99
3) для различных вводимых с клавиатуры чисел, найдите сумму положительных нечетных чисел.
4) вычислить у, если... (смотреть внизу )

Answer 1

Programa vichislenie_ploshadi_treug_po_Geronu; Var a,b,c,S,p:real; begin writenLn(‘dliny storon’); readLn(a); readLn(b); readLn(c); p:=(a+b+c)/2; S:=sqrt(p*(p-a)*(p-b)*(p-c)); writenLn(‘ploshad=’,S); end. 4. Выполнение. Alt+F9 – компиляция, проверка на ошибки. Ctrl+F9-выполнение программы. Вводим переменные(длины сторон треугольника). Alt+F5 – просмотре результатов. Получаем на экране ответ. 5. Объяснение: Programa vichislenie_ploshadi_treug_po_Geronu;(название программы) Var a,b,c,S,p:real;(переменные в программе) begin(начало рабочей области) writenLn(‘dliny storon’);(оператор ввода оповещает о необходимости ввести переменные) readLn(a); readLn(b); readLn(c);(считывается значение переменных в память компьютера) p:=(a+b+c)/2;(рассчитывается полупериметр) S:=sqrt(p*(p-a)*(p-b)*(p-c));(рассчитывается площадь треугольника) writenLn(‘ploshad=’,S);(вывод результата на экран) end.(конец рабочей области)