95

Проверьте пожалуйста на правильность. Задача: Вычислить периметр в…

22 августа 2022

Проверьте пожалуйста на правильность. Задача: Вычислить периметр в прямоугольнике. ProgramPerimetr; Var a, b, c, d: integer; BeginWriteLn ('Введите первое число'); ReadLn (a); WriteLn ('Введите второе число'); ReadLn (b); WriteLn ('Введите третье число'); ReadLn (c); d: =a*(b+c); ReadLn; End.

категория: информатика

81

WriteLn ('Введите третье число'); Двойные кавычки это, конечно, хорошо, но думаю машина не оценит (текст только в одинарных кавычках). Также не очень ясно для чего вводится 3 числа, а не 2, на сколько я знаю, то периметр прямоугольника — 2 (a+b). Также нету вывода найденного периметра (ф-я writeln (d) — если d — периметр).

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...