Информатика на пять О нас
 Добавить в избранное
5byte.ru
 Теория
 8 класс
 9 класс
 10 класс
 11 класс
Задания
 8 класс
 9 класс
 10 класс
 11 класс
Книги
Тесты
ЕГЭ
Turbo Pascal 7
 Описание
 Задачи
HTML
Рефераты

Задача 12.

Программа определения существования треугольника со сторонами а, b и с.

program E4;
  var a, b, с: real;
begin
  writeln ('введите длины трех сторон треугольника ');
  readln (a, b, с);
  write ('треугольник со сторонами ', а, Ь, с);
  if (а + b > с) and (b + с > a) and (а + с > Ь) then
     write ('существует')
  else
     write ('не существует');
  readln
end.





 У Вас есть материал пишите нам
 
    Copyright © 2008    
Rambler's Top100