Задать вопрос
27 апреля, 08:20

Найдите ошибки в записи программы. Перепишите программу в исправленном виде.

program exmpl

var C: char

begin

write ('Введите длины трех сторон треугольника: ')

read (A, B, C)

write ('Треугольник со сторонами ', a, b, c)

if a + b > c and b + c > a and a + c > b

then write ('существует.')

else write ('не существует.')

end.

+5
Ответы (1)
  1. 27 апреля, 10:18
    0
    Program exmpl;

    var a, b, c: integer;

    begin

    write ('Введите длины трех сторон треугольника: ') ;

    read (A, B, C) ;

    write ('Треугольник со сторонами ', a, b:2, c:2) ;

    if ((a + b) > c) and ((b + c) > a) and ((a + c) > b)

    then write (' существует.')

    else write (' не существует.') ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Найдите ошибки в записи программы. Перепишите программу в исправленном виде. program exmpl var C: char begin write ('Введите длины трех ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы