Володарь
6 год назад
Помогите,пожалуйста.
Записать алгоритм в виде программы (pascal)
Алг Вычисление
Цел a,c
Вещ b
Нач
Вывод "a = "
Ввод a
Вывод "c = "
Вывод c
b = a+c/a^2+1
Вывод "b = ",b
Кон
ОТВЕТЫ
Евдокимов
Jul 7, 2019
Progpam vychisleniya;
var
a,c:integer;
b:real;
begin
writeln(Введите а:);
readln(a);
writeln(Введите c:);
readln(c);
b=a+c/sqr(a)+1;
writeln( b=,b);
end.
var
a,c:integer;
b:real;
begin
writeln(Введите а:);
readln(a);
writeln(Введите c:);
readln(c);
b=a+c/sqr(a)+1;
writeln( b=,b);
end.
277
Смежные вопросы:
