Вопрос №32985
Как на языке Pascal посчитать (A+B)*C?
Вычислить D при условии, что А=2, B=10, С=3, по формуле (A+B)*C
я дошел до вот этого и ничего не выходит:
Program Pascal;
Uses crt;
Var h:tD(A, B, C: real): real;
Begin
GetD := (A+B)*C;
writeln;
readln;
End.
Ответы
uses crt;
var
a, b, c, d:real;
begin
a := 2;
b := 10;
c := 3;
d := (a+b) * c;
writeln('d=', d);
end.
Как-то так должно быть. Я паскалевский синтаксис не помню :)
...c := 3;
a:=a+b;
b:=a-b;
a:=a-b;
...
© vorum.ru — вопросы и ответы,
Пишите нам на in@vorum.ru
Администрация сервера не гарантирует точность и достоверность размещаемых пользователями материалов, а также не несет ответственности ни за какие задержки, сбои, удаление или несохранность какой-либо пользовательской информации.
Цифры не для всех: 207
фига ты мозг
Program lsd;
Uses crt;
Const a=2, b=10,c=3;
Begin
write('d=', (a+b) * c);
readln;
End.
О, так реально короче, только, думаю, надо все-таки d отдельной строкой посчитать (типа как вот, вычислили :)), а потом вывести
Главное выполнить поставленную задачу с использованием минимальных ресурсов:)