//PascalABC
var
a, b, c, P, S : real;
begin
write('Введите длину стороны A> ');
readln(A);
write('Введите длину стороны B> ');
readln(B);
write('Введите длину стороны C> ');
readln(C);
writeln('Вычисление по формуле Герона');
P := (A + B + C) / 2;
S := sqrt(P * (P - A) * (P - B) * (P - C));
writeln('Площадь треугольника S = ', S);
end.
Var
n:integer;
begin
readln(n);
if n > 10 then writeln(n, ' > ', 10);
if n < 10 then writeln(n, ' < ', 10);
if n = 10 then writeln(n, ' = ', 10);
<span>end.</span>
Размер файла – это количество содержащейся в нем информации, измеренное в байтах.
может обозначаться
б
КБ
МБ
ГБ
Тб
Формула свободного падения и формулы которые тут нужны - разные. могу только дать тебе "скелет" программы. теперь тебе нужно найти именно ЭТИ формулы, которые записаны в задаче, возможно таких формул в чистом виде не существует и нужно применять навыки знания физики
В первом задании по моему вместо тире должна стоят → (импликация)
(Последняя буква гласная ^ Третья буква согласная) → Первая буква согласная? Россия - истина, Люксембург - истина, Америка - истина, Испания - ложно.