Home
О нас
Products
Services
Регистрация
Войти
Поиск
gamgaval01Temka228
@gamgaval01Temka228
September 2021
1
9
Report
TurboPascal дан массив c15 определите количество нечетных чисел составить программу
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
petyaGavrikov
Verified answer
Const n=15;
var c:array[1..n] of integer;
k,i:integer;
begin
Randomize;
for i:=1 to n do begin
c[i]:=random(51);
write(c[i],' ');
end;
writeln;
k:=0;
for i:=1 to n do
if c[i] mod 2<>0 then k:=k+1;
writeln('k = ',k);
end.
Пример:
34 45 49 29 19 18 20 29 10 13 35 24 48 42 20
k = 7
0 votes
Thanks 0
More Questions From This User
See All
gamgaval01Temka228
August 2022 | 0 Ответы
Расскажите все про график где возрастает убывает и все что знаете...
Answer
gamgaval01Temka228
July 2022 | 0 Ответы
sin^2x-2sin x*cos-3cos^2x=0...
Answer
gamgaval01Temka228
July 2022 | 0 Ответы
c) = log a b - log a c; на каждую формулу 5 примеров заранее спасибо...
Answer
gamgaval01Temka228
July 2022 | 0 Ответы
x+6=0 решите пожалуйста...
Answer
gamgaval01Temka228
July 2022 | 0 Ответы
Осуществить следующие превращения: P→Ca3P2→PH3→P2O5→K3PO4→Ag3PO4, 1,2,3-разобр...
Answer
gamgaval01Temka228
March 2022 | 0 Ответы
Помогите!!!! U(t)=3t^2+2t S(1c-4c)=?...
Answer
gamgaval01Temka228
November 2021 | 0 Ответы
1-2x^2+7x=0 Помогите пожалуйста...
Answer
gamgaval01Temka228
September 2021 | 0 Ответы
Одно яблоко стоит 3 р., апельсин 5 р., банан 7 р. Вы купили 42 фрукта за 216 р.,...
Answer
gamgaval01Temka228
August 2021 | 0 Ответы
Задание таблицу 1 найти что в x,y,N пожалуйста 9примеров должно быть...
Answer
рекомендуемые вопросы
rarrrrrrrr
August 2022 | 0 Ответы
о чем должны позаботиться в первую очередь взрослые при организационном вывозе н...
danilarsentev
August 2022 | 0 Ответы
Есть два станка на которых выпускают одинаковые запчасти один производит a запча...
myachina8
August 2022 | 0 Ответы
Найти по графику отношение V3:V1. В ответах написано 9, но нужно решение...
ydpmn7cn6w
August 2022 | 0 Ответы
Choose the correct preposition: 1.I am fond (out,of,from) literature. 2.where ar...
millermilena658
August 2022 | 0 Ответы
Определите Как создавалась и кто создавал арабское государство в крации...
MrZooM222
August 2022 | 0 Ответы
Ч. Айтманов в рассказе "Красное яблоко" использует метод рассказ в рассказе. Опи...
timobila47
August 2022 | 0 Ответы
каково было назначение каждой из частей византийского храма? помогите пожалуйста...
ivanyyaremkiv
August 2022 | 0 Ответы
moment. 6....
Участник Знаний
August 2022 | 0 Ответы
Пожалуйста!!!!!!!!!!!!...
sarvinozwakirjanova
August 2022 | 0 Ответы
помогите пожалусто пж...
×
Report "TurboPascal дан массив c15 определите количество нечетных чисел составить програ..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Const n=15;var c:array[1..n] of integer;
k,i:integer;
begin
Randomize;
for i:=1 to n do begin
c[i]:=random(51);
write(c[i],' ');
end;
writeln;
k:=0;
for i:=1 to n do
if c[i] mod 2<>0 then k:=k+1;
writeln('k = ',k);
end.
Пример:
34 45 49 29 19 18 20 29 10 13 35 24 48 42 20
k = 7