Вычислить в паскале a = (b+c) * d-k

Question

Информатика

Корнилий

28 июня, 07:13

Вычислить в паскале a = (b+c) * d-k

+5

Ответы (2)

Знаете ответ?

Олимпий · Answer 1

Var b, c, d, k, s:integer; begin

Writeln ('b:') ;

readln (b) ;

Writeln ('c:') ;

readln (c) ;

Writeln ('d:') ;

readln (d) ;

Writeln ('k:') ;

readln (k) ;

s:=b+c*d-k;

Writeln (s) ;

end.

Готя · Answer 2

Program asd;

var a, b, c, d, k:integer;

begin

Write ('Write B: ') ; Readln (B) ;

Write ('Write C: ') ; Readln (C) ;

Write ('Write D: ') ; Readln (D) ;

Write ('Write k: ') ; Readln (k) ;

a: = (b+c) * d-k;

Writeln ('Resul: ', a) ;

end.