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

Question

95

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

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

ответить

в избранное ссылка

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

vital · Accepted Answer

81

vital

01 марта 2023

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

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: