Автор - chingaf2002

1. Сформировать массив из 10 целых чисел случайным образом из [20;100], на экран.
2. Четные элементы заменить на число 3, а нечетные на -3, вывести на экран.
3.Элементы, стоящие на четных местах 3, на нечетных -3, на экран.
П.С я настолько глуп в информатике, что даже вопроса не понял. Помогите, люди добрые!​

Ответ

Проверено экспертом

Автор - petyaGavrikov

1_2.

const n=10;

var a:array[1..n] of integer;

i:integer;

begin

randomize;

writeln('Исходный массив:');

for i:=1 to n do

begin

a[i]:=random(81)+20;

write(a[i],' ');

end;

writeln;

writeln('Полученный массив:');

for i:=1 to n do

begin

if a[i] mod 2=0 then a[i]:=3 else a[i]:=-3;

write(a[i]:3);

end;

writeln;

end.

Пример:

Исходный массив:

49 25 50 90 82 20 71 25 57 45  

Полученный массив:

-3 -3  3  3  3  3 -3 -3 -3 -3

1_3.

const n=10;

var a:array[1..n] of integer;

i:integer;

begin

randomize;

writeln('Исходный массив:');

for i:=1 to n do

begin

a[i]:=random(81)+20;

write(a[i],' ');

end;

writeln;

writeln('Полученный массив:');

for i:=1 to n do

begin

if i mod 2=0 then a[i]:=3 else a[i]:=-3;

write(a[i]:3);

end;

writeln;

end.

Пример:

Исходный массив:

85 29 99 27 80 70 70 58 78 46  

Полученный массив:

-3  3 -3  3 -3  3 -3  3 -3  3

Ответы и объяснения

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.
© 2025 Все права защищены Политика конфиденциальности Контакты
search points attachment profile arrow left arrow right star heart verified symbols equation arrow-down question mark check menu accountancyadministrationagriculturalalgebraallarabicartart_musicbelarusbelarus_altbiologybusinesscatalachemistrychineseeconomicsegzamenglishentrepreneurshipenvironmentethicseuskarafirst_aidfrenchgalegogeographygeologygeometrygermangrammarhealthhistoryindia_langindonesian_langinformaticsitalianjapanesekazachkazach_altkoreanlanguagelatinlawlife_scienceliteraturelogicmathematicsmusicnigerian_langother_languagesotherspedagogicsphilosophyphysical_educationphysicspoliticspsychologyreligionrpa_langrussianrussian_altsciencesecurityskillssocial_sciencesociologyspanishstatisticstechnologytourismtrafficukrainianukrainian_altukrainian_literaturewos_civilisation accountancyadministrationagriculturalalgebraall_1arabicartart_music_2belarusbelarus_altbiologybusiness_2catalachemistry_1chineseeconomicsexam_3englishentrepreneurshipenvironment_2ethicseuskarasecurity_1frenchgalegogeography_4geology_4geometrygermangrammarhealthhistoryindia-langindonesian-langinformaticsitalianjapanesekazachAsset 230koreanlanguagelatinlawlife-scienceliteraturelogic_2mathematicsmusicnigerian-langotherlanguagesother_1pedagogicsphilosophyphysical_educationphysicspoliticspsychologyreligion_1rpa-langrussianrussian_altsciencesecurity_3_mskills_1allsocial_science_5_msociologyspanishstatisticstechnologytourismtrafficukrainianukrainian_altukrainian_literaturewos_civilisation