Предмет: Информатика,
автор: Эл1тН1к
Помогите
Решить выражение Pascal 3.45+7a/2b
Ответы
Автор ответа:
1
Program qwerty;
Var a,b,rez:real;
Begin
Write('Введите a и b: ');
Readln(a,b);
If b=0
Then writeln('Ошибка. На 0 делить нельзя')
Else begin Rez:=3.45+7*a/2*b;
Writeln('3.45+7a/2b=',rez);
end;
End.
Var a,b,rez:real;
Begin
Write('Введите a и b: ');
Readln(a,b);
If b=0
Then writeln('Ошибка. На 0 делить нельзя')
Else begin Rez:=3.45+7*a/2*b;
Writeln('3.45+7a/2b=',rez);
end;
End.
Похожие вопросы
Предмет: Обществознание,
автор: t562bkhtv7
Предмет: Биология,
автор: Vlllka
Предмет: Английский язык,
автор: rysbekbekarys
Предмет: Физика,
автор: Feridey
a, b: real;
begin
Write('Введите a и b: ');
Readln(a, b);
if b = 0 then
writeln('Ошибка. На 0 делить нельзя')
else
Writeln('3.45 + 7 * ', a, ' / (2 * ', b, ') = ', 3.45 + 7 * a / 2 * b);
end.