ФУНКЦИИ
и ГРАФИКИ

ЭЛЕМЕНТАРНЫЕ ФУНКЦИИ
ГРАФИКИ
ТЕСТЫ
КОНТАКТЫ
КАРТА САЙТА
НА ГЛАВНУЮ

NEW !!!

ПРОГРАММИРОВАНИЕ
TURBO PASCAL
C++
ПРОВЕРЬ СВОИ ЗНАНИЯ!
ЛАБОРАТОРНАЯ №1 ВАРИАНТ 8
Задача: Дан четырехугольник. Проверить, является ли он параллелограммом. С клавиатурывводятся длины сторон четырехугольника А, В, С, D). Результат выводится на экран в удобном для восприятия виде.
Решение:
> >Скачать< <
program task8;
var a,b,c,d:real;
begin      a := 0;
     b := 0;
     c := 0;
     d := 0;
     writeln('VVEDITE DLINI STORON CHETIREHUGOLNIKA');
     readln(a,b,c,d);
     if (a=c) and (b=d) then writeln('ETO PARALLELOGRAMM')      else writeln('ETO NE PARALLELOGRAMM');
     readln;
end.

Используются технологии uCoz