Program tt; const Pi=3.14; var r,h:integer; s,v:real; begin write('Введите r= '); readln(r); write('Введите h='); readln(h); S:=2*Pi*r*(h+r); writeln('Площадь равна ',S); readln; end.
Все работает проверил.
elaginaelena70
22.11.2020
Значение компьютера в современной жизни Компьютер, или электронно-вычислительная машина, в нашей жизни занимает все большее место. С его можно напечатать текст или произвести математические вычисления, составить расписание движения поездов и управлять технологическим процессом на заводе, изучать иностранные языки и руководить полетом космической станции, вести бухгалтерские расчеты и планировать бюджет страны, общаться с людьми, находящимися в любой точке земного шара, и вести тончайшие хирургические операции, послать письмо другу и сделать фотографию. Я могла бы еще долго перечислять возможности современных компьютеров. Но и из этого перечня ясно, что развитие современных технологий, управление экономикой и производством, образование и медицина, наука и космос сегодня немыслимы без компьютера.
Григорьевич915
22.11.2020
На данный момент компьютер имеет важную роль в жизни каждого человека . Но у него есть и плюсы и минусы . Плюсы состоят в том что ,с компьютера мы можем найти нужную нам информацию в интернете ,мы можем общаться с людьми ,можем играть ,развлекаться, смотреть смешые ролики ,писать научные работы , развиваться .Минусы состоят в том что ,компьютер не очень то и хорошо действует на организм человека .Если слишком долго проводить свое время у компьютера ,то ваше зрение будет по тихоньку портится .Порой резко может заболеть голова . Появляется зависимость ,которая плохо влият на человека ,отнимает массу свободного времени . Я провожу у компьютера мало времени,только на все самое нужное .Я считаю это важным открытием для человечества .Главное соблюдать правила ,и проводить определенное колличество времени около него.
const
Pi=3.14;
var
r,h:integer;
s,v:real;
begin
write('Введите r= ');
readln(r);
write('Введите h=');
readln(h);
S:=2*Pi*r*(h+r);
writeln('Площадь равна ',S);
readln;
end.
Все работает проверил.