Dimston134877
?>

Даны r1 и r2 . найти площадь кольца. (площадь круга: s= pr2 написать программу, заранее ))

Информатика

Ответы

konss2
Предположим, что последовательность же задана, то есть вводить ее мы не будем. последовательность представляет собой массив чисел а. n: =1;   k: =0; for i: =1 to 100 do if (a[i]< 0) then k: =k+1; проверяем наличие отрицательных if (k=0) then writeln("отрицательных нет.") else begin for i: =1 to 100 do if (a[i]< 0) then n: =a[i]; находим хотя бы один отрицательный for i: =1 to 100 do if ((a[i]< 0) and (a[i]> n) then n: =a[i]; находим наибольший отрицательный writeln("наибольшее из отрицательных чисел данной последовательности - ",n); end; end.
konstantinslivkov
1.  система программирования   — это система для разработки новых программ на конкретном языке программирования.2. системные программы  выполняются вместе с прикладными и служат для ресурсами компьютера — центральным процессором, памятью, вводом-выводом. это программы общего пользования, которые  предназначены для всех пользователей компьютера.  системное программное обеспечение разрабатывается так, чтобы компьютер мог эффективно выполнять прикладные программы.3.программа на паскале     program summa;       type mas = array [1 .. 100] of real;     var a   : mas;             i, n: integer;             s    : real;   begin      write('n = ');   readln(n);       for   i : = 1 to n do          begin            write('a[', i, '] = ');             readln(a[i]);           end;       s : = 0;       for   i : = 1 to n do            s : = s + a[i];       writeln('s = ', s: 8: 2);   end.

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

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

Даны r1 и r2 . найти площадь кольца. (площадь круга: s= pr2 написать программу, заранее ))
Ваше имя (никнейм)*
Email*
Комментарий*

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

anton
Alenachernika9111
Шавкат кызы
vikanikita
Олимов Протопопова
sde19755511
topsalon
unalone5593
Varezka86179
Рудаков Бахтовар
mariapronina720126
chuev4444
Rjkjneirbyf555
ganzashop
dima-pashkovec