Var a,b,c,d,x: Real;
begin
writeln('Введите a,b,c,d');
readln(a,b,c,d);
x:=a/(b+c)-d;
writeln(x);
end.
Ответ:
Объяснение:
1.Програ́ммное обеспе́чение(допустимо также произношение обеспече́ние (ПО) — программа или множество программ, используемых для управления компьютером
Другие определения из международных и российских стандартов:
совокупность программ системы обработки информации и программных документов[, необходимых для эксплуатации этих программ (
все или часть программ, процедур, правил и соответствующей документации системы обработки информации
компьютерные программы, процедуры и, возможно, соответствующая документация и данные, относящиеся к функционированию компьютерной системы
Программное обеспечение является одним из видов обеспечения вычислительной системы, наряду с техническим (аппаратным), математическим, информационным, лингвистическим, организационным, методическим и правовым обеспечением
Program Num1;
var a, b, c , s, p, rb, ro :real;
begin
writeln ('Введите стороны треугольника через пробел');
read (a,b,c);
p:= (a+b+c)/2;
s:= sqrt(p*(p-a)*(p-b)*(p-c));
rb:= s/p;
ro:= (a*b*c)/(4*s);
writeln ('RB = ',rb:0:2,' RO = ',ro:0:2);
end.
2)В конце программы будет написано:
данные
1418324196
результат:a=14,k=18
Ответ:
информация это когда о чем-то дают какую-нибудь информацию.
Решение пишу с телефона. Поэтому проверить, компилируется ли программа или нет, я не смогу.
program zd1;
var x,y,pi:integer;
begin
writeln ('Введите значение переменной X');
readln (x);
pi:=3,14;
if (0 <= x <= 1) then y:=x^4-4
else
y:=sqr(x)-sin (pi*sqr (x));
writeln ('Ответ = ', y);
end.