Составить программу на паскале найти периметр 5 угольника
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Таваддуд
var a1, a2, a3, a4, a5, P : integer;beginwriteln ('Введите все стороны данного пятиугольника.');read (a1); read (a2); read (a3); read (a4); read (a5); P := a1 + a2 + a3 + a4 + a5;writeln ('Периметр пятиугольника равен ', P , '.');end.
Вариант для правильного пятиугольника:
var a, P : integer;beginwriteln ('Введите сторону данного пятиугольника.');read (a);P := a * 5;writeln ('Периметр равен ' , P , '.');end.
Вариант для правильного пятиугольника:
var a, P : integer;beginwriteln ('Введите сторону данного пятиугольника.');read (a);P := a * 5;writeln ('Периметр равен ' , P , '.');end.
Новые вопросы в разделе Информатика
Адинела
05.10.2022, 08:15
Гаязутдин
05.10.2022, 01:10
Алайбек
05.10.2022, 01:05
Акияма
05.10.2022, 01:00