• Составьте програму, которая вводит с клавиатуры длину и ширину прямаугольника и определяет, является ли прямаугольник квадратом. Постройте данный прямоугольник ( единицу длины показать 5 пикселями)

Ответы 1

  • uses crt,graphABC;var x,y,xc,yc:integer;begin xc:=windowwidth div 2; yc:=windowheight div 2;

    write ('Введите ширину '); read (x); write ('Введите длину '); read (y);

    if (x=y) then write ('Это квадрат'); hidecursor; setpencolor(clAqua); rectangle(xc-x*5,yc-y*5,xc+x*5,yc+y*5); floodfill(xc,yc,clAqua); readkey;

    end.

    • Автор:

      myers
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years