ashybasaida-33
?>

Free pascal! дан массив определенной длины. проинициализировать массив и найти количество элементов массива, имеющих четные порядковые номера, но являющиеся нечетными числами.

Информатика

Ответы

Макаров1887
Uses Crt;
Const N = 13;
Var
   A:array[1..N] of integer;
   i,k:integer;
Begin
Randomize;
ClrScr;
k:=0;
For i:= 1 to N do
    Begin
    A[i]:=random(21)-10;
    Write(A[i],' ');
    if (i mod 2 = 0)and(A[i] mod 2 <> 0) then k:=k+1;
    End;
WriteLn;
Write('k = ',k);
ReadLn
End.
zotovinbox468

Богатая стандартная библиотека является одной из привлекательных сторон языка программирования Python. Здесь имеются средства для работы со многими сетевыми протоколами и форматами интернета, например, модули для написания HTTP-серверов и клиентов, для разбора и создания почтовых сообщений, для работы с XML и т. п. Набор модулей для работы с операционной системой позволяет писать кросс-платформенные приложения. Существуют модули для работы с регулярными выражениями, текстовыми кодировками, мультимедийными форматами, криптографическими протоколами, архивами, сериализации данных, поддержка юнит-тестирования и др.

Объяснение:

Yurevich1291
Плагиат - бұл басқа біреудің сөздеріне немесе идеяларына несие алу. Бұл зияткерлік әділетсіздіктің актісі және бұл ауыр зардаптарға әкеледі . Бұл университеттің ар-намыс кодексін бұзады және адамның беделіне жағымсыз залал келтіруі мүмкін. Плагиатизацияланған тапсырма сыныпқа, суспензияға немесе экспедицияға әкелуі мүмкін.

Әрине, бұл мәселені жеңіл шешу керек емес. Дегенмен, егер сіз академиялық адалдықпен әрекет етсеңіз, онда бұл қорқынышсыз.

Кездейсоқ плагиатты болдырмаудың ең жақсы жолы - бұл тұжырымның өзі.

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

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

Free pascal! дан массив определенной длины. проинициализировать массив и найти количество элементов массива, имеющих четные порядковые номера, но являющиеся нечетными числами.
Ваше имя (никнейм)*
Email*
Комментарий*

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

Andrei-Shchukin
generallor3
karavan85450
dedald
Semenova
kondrashovalf6404
horst58
gavrilasmax05
Itina321t
artemiusst
Kochereva-Sergei
Gaziev1636
info664
Bologova Golovach1989
smileystyle