Ответы на вопрос:
Var x,y: integer; begin x: =0; y: =0; read(x); if (x< > 10) then y: =x; writeln(x,' ',y); end.
var a: array of integer;
i,n,k: integer;
begin
write('введите количество элементов массива: ');
readln (n);
a: =new integer[n];
write ('массив: ');
for i: =0 to n-1 do
begin
a[i]: =random(199)-99;
if a[i] < 0 then k: =k+1;
write (a[i]: 5);
end;
writeln;
write ('количество отрицательных элементов ',k)
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
IrinaErmolenko23.08.2021 00:41
-
lena10199209.06.2022 20:42
-
KiraKen01.02.2023 16:29
-
viktoriag37319.05.2021 04:27
-
polina7snoy24.09.2022 01:50
-
Molly1111106.07.2021 05:16
-
Superymniaha19.03.2022 11:13
-
PsyhovanayaPechenka11.06.2023 16:27
-
Софии01125.06.2021 12:32
-
ttania444401.11.2022 23:42
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.