создайте программку по решению задачки Определить ,являются ли прямоугольники квадратами

Создайте программу по решению задачи Найти ,являются ли прямоугольники квадратами

Задать свой вопрос
Владислав Гавартовский
Не программку?
Гишян Егор
Програму
Даниил Гордуладзе
Программу *
Артемка Надоте
На Паскале?
Viktorija Kristman
Лазарус
Павел Туляткин
На будущее: Лазарус это Free Pascal.
Владик
что за ошибка ,подскажите что делать unit1 .pas(52,0)Fatal: Syntax error ,";"expected but" end of file"found
1 ответ
Var a,b:real;
Begin
Write('Длина = ');ReadLn(a);
Write('Ширина = ');ReadLn(b);
if a=b then Write('Является квадратом')
else WriteLn('Не является квадратом')
End.
Альбина
Спасибо ,)
Таисия Мизютина
что за ошибка ,подскажите что делать unit1 .pas(52,0)Fatal: Syntax error ,";"expected but" end of file"found
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт