составить 2 блок схемы с предусловием с постусловием для решение задачи вычислить произведения чисел - id1483231620210605 от fdfggdjfikytktjjkykl 05.06.2021 07:41

Question

Информатика: составить 2 блок схемы с предусловием с постусловием для решение задачи вычислить произведения чисел от 1 до5

fdfggdjfikytktjjkykl · Accepted Answer

При копировании кода формат испортился. Код должен выглядеть как на картинке

var r, l: real; //Радиус и длина окружности соответственно top, bottom: real; //Внешний и внутренний радиус кольца ex_num: word;begin write('Введите номер задания: '); read(ex_num); if ex_num = 1 then begin write('Введите радиус: '); read(r); writeln('Длина окружности: ', 2 * pi * r); writeln('Площать круга данного радиуса: ', pi * r * r); end else if ex_num = 2 then begin writeln('Введите длину окружности: '); read(l); write('Площадь круга: ', pi * sqr(l / 2 * pi)); end else begin write('Введите внешний радиус кольца: '); read(top); write('Введите внутренний радиус кольца: '); read(bottom); write('Площадь кольца: ', pi * top * top - pi * bottom * bottom); end;end.
1.вычислить длину окружности и площадь круга радиуса-r 2.известна длина окружности,найти площадь кру

1.вычислить длину окружности и площадь круга радиуса-r 2.известна длина окружности,найти площадь кру

составить 2 блок схемы с предусловием с постусловием для решение задачи вычислить произведения чисел от 1 до5

MOGZ ответил