Написать программу нахождения периметра параллелограмма по известным сторонам c и h (c и h — целые числа,...

Тематика Информатика
Уровень 5 - 9 классы
параллелограмм периметр программа Pascal целые числа ввод с клавиатуры переменные арифметические операции
0

Написать программу нахождения периметра параллелограмма по известным сторонам c и h (c и h — целые числа, вводимые с клавиатуры).

1)program perimetr;

var

begin

write('c=');

readln(c);

write('h=');

readln(h);

p:=2*(c+h);

writeln('p=',p);

readln;

end.

2)program perimetr;

var

c,h,p:integer;

begin

write('c=');

readln(c);

write('h=');

readln(h);

writeln('p=',p);

readln;

end.

3)program perimetr;

var

c,h,p:integer;

begin

write('c=');

readln(c);

write('h=');

readln(h);

p:=2*(c+h);

writeln('p=',p);

readln;

end.

avatar
задан 2 месяца назад

2 Ответа

0

Первая программа вводит значения сторон параллелограмма c и h с клавиатуры, затем вычисляет и выводит их периметр по формуле p = 2*(c + h).

Вторая программа также вводит значения сторон c и h, но забыла присвоить значение переменной p после расчета периметра. Поэтому на экран будет выведено некорректное значение.

Третья программа корректно вычисляет и выводит периметр параллелограмма по известным сторонам c и h.

avatar
ответил 2 месяца назад
0

Для нахождения периметра параллелограмма по заданным сторонам ( c ) и ( h ) (где ( c ) — длина одной стороны, а ( h ) — длина другой стороны), необходимо использовать формулу периметра. Формула периметра параллелограмма выглядит следующим образом:

[ P = 2 \cdot (c + h) ]

Теперь разберем каждый из предложенных программных кодов и выясним, какой из них правильно вычисляет периметр и выводит его на экран.

1. Первый вариант программы:

program perimetr;

var

begin

write('c=');
readln(c);
write('h=');
readln(h);
p:=2*(c+h);
writeln('p=',p);
readln;

end.

В этом варианте кода есть несколько ошибок:

  1. Не объявлены переменные ( c ), ( h ) и ( p ).
  2. Программа не скомпилируется из-за отсутствия раздела объявлений переменных.

2. Второй вариант программы:

program perimetr;

var
c, h, p: integer;

begin

write('c=');
readln(c);
write('h=');
readln(h);
writeln('p=',p);
readln;

end.

В этом варианте кода также есть ошибки:

  1. Переменные объявлены правильно.
  2. Формула для вычисления периметра отсутствует. Значение переменной ( p ) не вычисляется, а сразу выводится на экран, что приведет к некорректному результату (значение ( p ) будет неопределенное).

3. Третий вариант программы:

program perimetr;

var
c, h, p: integer;

begin

write('c=');
readln(c);
write('h=');
readln(h);
p := 2 * (c + h);
writeln('p=', p);
readln;

end.

Этот вариант является правильным:

  1. Переменные ( c ), ( h ) и ( p ) объявлены корректно.
  2. Формула для вычисления периметра ( p := 2 \cdot (c + h) ) приведена правильно.
  3. Результат вычисления периметра выводится на экран.

Итог

Третий вариант программы корректно реализует задачу нахождения периметра параллелограмма по заданным сторонам ( c ) и ( h ). Именно этот вариант следует использовать для правильного вычисления и вывода периметра на экран.

avatar
ответил 2 месяца назад

Ваш ответ

Вопросы по теме