


Помогите по физике плиз срочно надо 6 заданий
1.Выбери программу, которая вычисляет длину гипотенузы.
Варианты ответов:
(1)var
n,z,p:real;
begin
writeln('Введи длины катетов n и z ');
readln(n,z);
p:=n*n+z*z;
writeln('p=',c:8:2);
readln;
end.
(2) var
n,z,p:real;
begin
writeln('Введи длины катетов n и z ');
readln(n,z);
p:=sqr(sqrt(n)+sqrt(z));
writeln('p=',c:8:2);
readln;
end.
(3) var
n,z,p:real;
begin
writeln('Введи длины катетов n и z ');
readln(n,z);
p:=sqrt(n*n+z*z);
writeln('p=',p:8:2);
readln;
end.
2.Составить алгоритм сложения двух целых чисел C и D, вводимых с клавиатуры. Результат сложения записать в виде переменной P . По данному алгоритму написать программу в Паскале.
Алгоритм
(1) алг сложение
цел C,D,P
нач
ввод C
ввод P
D:=C+P
вывод P
кон
(2) алг сложение
цел C,D,P
нач
ввод C
ввод D
P:=C+D
вывод P
кон
(3) алг сложение
цел C,D,P
нач
ввод C
ввод D
P=C+D
вывод P
кон
Программа в Паскале
(1) program summa;
var
C,D,P:integer;
begin
readln(C);
readln(D);
P:=C+D;
writeln(C);
end.
(2) program summa;
var
C,D,P:integer;
begin
readln(C);
readln(D);
P:=C+D;
writeln(P);
(3) program summa;
var
C,D,P:integer;
begin
readln(C);
readln(D);
P:=C+D;
writeln(P);
end.
3.Выражение записано на языке Паскаль: 2x+9 . Какая ошибка допущена?
(1) выражение записано без скобок
(2) пропущен знак умножения между 2 и х
(3) числа записаны без скобок
(4) нет верного ответа
4.Запиши математическое выражение (3+t)2 на языке Паскаль. (При записи ответа используй прописные буквы).
Ответ:
5.Функция sqr(x)
Назначение
(1) умножение
(2) квадрат x
(3) приближенное значение
(4) логарифм x
6.Найди объём шара, если длина радиуса вводится с клавиатуры.
Объём шара вычисляется по формуле: V=43π⋅R3.
Опиши константу: π=3,14 и ответ должен быть округлён до десятых.
Выведи ответ, если длина радиуса 7.
Ответ:
токо эта инфа захазх