Julina23
Опубликовано 6 лет назад по предмету Информатика от Julina23


 Написать программу на языке Paskal

Заданы диаметр круга D  и сторона квадрата А. Определить, поместится ли круг в квадрате. Задачу проверить при

а) D=70, A=36

б) D=8, A=64

Квадрат поместится в круге, если диаметр окружности меньше или равен стороне квадрата. Результат вывести на экран.

  1. Ответ
    Ответ дан Nickel

    Program nm12;

    Var a, d : integer;

    begin

      writeln (' Vvedite diametr kruga i storony kvadrata ');

      readln (d);

      readln (a);

      if d<=a then writeln (' Krug pomestits9 v kvadrate ')

                 else writeln (' Krug ne pomestits9 v kvadrate ');

      readln;

    End.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц