Пожалуйста, напишите програму на паскале!
Спасибо!
Приложения:
Ответы на вопрос
Ответил Akelvud
0
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.
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.
Новые вопросы