Помогите пожалуйста) Сжелать программы в ПАСКАЛЕ. ОЧЕНЬ НАДО. Заранее спасибо.
10-11 класс
|
№1
var a, b, c: real;
begin
readln(a, b);
c:=sqrt(a*a+b*b);
writeln(c);
end.
№2
var a, b, s, r: real;
begin
readln(a, b);
s:=a*a*a+b*b*b;
r:=a*a-b*b;
writeln('Сумма кубов =', s);
writeln('Разность квадратов=', r);
end.
№3
var a, b, c: real;
begin
readln(a, b);
c:=(a+2*a*b-b)/(b+cos(a*a));
writeln(c);
end.
№5
var x, c: real;
begin
readln(x);
c:=2*x*x*x*x-3*x*x+4*x*x-5*x+6;
writeln(c);
end.
Другие вопросы из категории
а:=6
b:=1
b:=a/2*b
a:=2*a+3*b
1)Валентина
2)Герман
3)Анастасия
4)Яков
Читайте также
2. Найти квадраты всех отрицательных чисел среди N заданных.
3. Найти количество чисел, среди N введенных,которые имеют нечетные порядковые номера, а сами являются четными числам.
4. напишите программу для вычисления суммы:
- 1*1!+2*2!+3*3!+....+n*n!
- 1*3+3*5+5*7+...n(n+2)
- 1+11+111+...+111+1-n слагаемых.
Помогите, пожалуйста написать программы для паскаля, очень нужно. Заранее спасибо.
Задана последовательность целых чисел,количество которых не превосходит 100.Требуется определить за один проход элемент с максимальным значением,а также число его повторений в последовательности.
1. Напишите программу формирования и вывода массива размером 6x3, каждые три последовательных элемента в строке которого составлены по следующему правилу:
1-й — равен случайному числу;
2-й — равен целой части квадратного корня из предыду щего элемента;
3-й-равен сумме двух предыдущих элементов.
Составить программу перевода натурального числа из десятичной системы счисления в двоичную