Предмет: Информатика,
автор: Эл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.
Интересные вопросы
Предмет: Математика,
автор: maksimegin2009
Предмет: География,
автор: hanyaxme
Предмет: Химия,
автор: Pakemon33
Предмет: География,
автор: бобер313
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.