Текст с картинками, Программа, Видеофильм
Контекстное меню<span> – это меню, которое отображается в отдельном окошке и показывает действия, которые можно произвести с выбранными файлами, папками или отдельными элементами!</span><span>
</span>
var
a: real;
k: byte;
begin
writeln('1 - l okp.');
writeln('2 - r okp.');
writeln('3 - d okp.');
readln(k);
readln(a);
write('S = ');
case k of
1: writeln(sqr(a) / (4 * Pi):0:2);
2: writeln(Pi * sqr(a):0:2);
3: writeln(Pi * sqr(a / 2):0:2);
else writeln('?');
end;
end.
Введя данный код в турбо Паскаль был дан ответ: 51
Если сейчас он поет, то через 45 минут он будет махать хвостом