Пожалуйста, напишите програму на паскале!
Спасибо!
Var
s,b,c:longint;
begin
assign(input,input.txt);
reset(input);
assign(output,output.txt);
rewrite(output);
readln(s,b);
Writeln(S+s+b+b);
writeln(s*b);
end.
Оцени ответ
