Ответ:
Var
a, b, c :integer;
Begin
Write('Vvedite a i b :'); Readln(a,b);
c:=2*(a+b);
Writeln('Perimetr=',c);
Readln;
End.
Объяснение:
Изззи
Я смог помочь!?
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Var
a, b, c :integer;
Begin
Write('Vvedite a i b :'); Readln(a,b);
c:=2*(a+b);
Writeln('Perimetr=',c);
Readln;
End.
Объяснение:
Изззи
Я смог помочь!?