Alisa
?>

Як викликати модуль для малювання * from input turtle*from print turtle*from import turtle*from init turtle* ​

Информатика

Ответы

Эрендженова
Uses crt;
var
    b, a: real;
    n: integer;

begin
    clrscr;
    repeat
        Write('Выберите фигуру (1-квадрат, 2-прямоугольник)');
        Readln(n);
        
        case n of
            1:
                begin
                    write('Сторона квадрата=');
                    readln(a);
                    Write('S=', a * a);
                end;
            2:
                begin
                    write('Стороны прямоугольника=');
                    readln(b, a);
                    Write('S=', b * a);
                end;
        else exit;
        end;
    until false;
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Як викликати модуль для малювання * from input turtle*from print turtle*from import turtle*from init turtle* ​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

elenaowchinik4842
alena
olgakuz00261
Сергеевич1907
Savva1779
office3
langprint
pristav9
sohrokova809
Sukharev-Achkasov
aedunova3
potapin
Panda062000
Александр Джабраиловна1967
Aleksandr768