const n=30;
var k: array[1..n] of integer; i,t,p: integer;
begin
randomize;
for i: =1 to n do begin
k[i]: =random(100);
if (k[i]> 0) then p: =p+1;
if (i=3) and (k[3]> 0) then t: =k[3];
end;
if (p< 3) then write('в массиве меньше трех положительных элементов') else writeln('третий элемент массива равен ', t);
end.
отрицательного значения в массиве не будет, напиши формулу к массиву k[i]: =твоя формула. формула должна быть такой, чтобы попадались и отрицательные элементы, а так, программа рабочая
В Ростове-на-Дону функционируют 43 библиотеки. На сегодняшний день в Ростове-на-Дону работают следующие театры и цирк:
Ростовский академический театр драмы им. М. Горького, основанный в 1863 году
Ростовский государственный театр кукол
Ростовский областной академический молодёжный театр (бывший ТЮЗ) , основанный в 1963 году
Ростовский государственный музыкальный театр
Ростовский государственный цирк
На территории города имеются развалины древних поселений, постройка которых датируется разными эпохами — вплоть до 5 тысяч лет назад, но современная история города начинается со времён Азовских походов Петра Великого (1695—1696 годы) , который обратил внимание на урочище с источником под названием «Богатый колодезь» .