Предмет: Информатика,
автор: anandrey2222
помогите пожалуйсто решить, задачу в паскале.
спасибо большое заранее
Приложения:
Ответы
Автор ответа:
0
var
a,a1,b,b1,n,c:longint;
begin
readln(a);
readln(a1);
readln(b);
readln(b1);
readln(n);
c:=n-(a×a1+b×b1);
writeln(c);
end.
a,a1,b,b1,n,c:longint;
begin
readln(a);
readln(a1);
readln(b);
readln(b1);
readln(n);
c:=n-(a×a1+b×b1);
writeln(c);
end.
Автор ответа:
0
Зачем так много readln? Можно ведь за одну операцию прочитать все переменные
Автор ответа:
0
Как там написано так и сделал
Похожие вопросы