Предмет: Информатика, автор: kokoiiiii

сделать такую же программу только с периметром прямоугольника (это среднее арифметическое)

Приложения:

Giammy: Что вам мешает убрать 1 переменную, и изменить формулу на (a+b)*2?
Browze: 2 переменные: SA и C
Giammy: Переменная SA будет хранить результат, можно её переименовать разве.
Browze: Вообще, зачем она, если результат можно вычислять прямо в выводе?Для галочки, разве что
Giammy: Для учителя

Ответы

Автор ответа: Browze
1

program pryamoygol;

var

   A,B, result:integer;

begin

   readln(A,B);

   result := 2*(A+B);

   writeln('Периметр прямоугольника = ',result);

end.


Приложения:

Browze: Ее можно было сделать и короче, но тогда структура программы будет немного другая по сравнению с той, которую ты показал.
Giammy: Короче, это на 1 строку меньше? fpc не знает что такое короткий код)
Browze: Ну, почему же..на 2)))
Giammy: 2? Имя программы еще?
Browze: Имя программы я вообще никогда не использую. Нет переменной result, вычисления в выводе
Giammy: Это не 1 строка)
Похожие вопросы
Предмет: Русский язык, автор: karenrubenyan2
Предмет: Математика, автор: ИLюша