tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Создать массив натуральных нечетных
Создать массив натуральных нечетных чисел длины n, и вывести квадраты элементов в строку. блок схему
antonlutsenko1
3 27.07.2019 21:30
2
Ответы
8cvinka8
03.10.2020 14:42
For i:=1 to sqr(n) do
a[i]:=0; i:=1;
while(i<n)do begin
if(i mod 2 <> 0)then begin
a[i]:=1;
g:=i;
inc(i);
end
else inc(i);
end;
for i:=1 to g do
if(a[i]=1)then write(sqr(i),' ');
readln;
readln;
end;
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Anastasia987654321
20.06.2019 09:10
Спрограммы паскаль вычислить площадь параллелограмма. зарание !...
Ернай
06.12.2020 12:36
Сообщение, записанное буквами 16-символьного алфавита, содержит 10 символов. Какое количество информации оно несёт? *...
simonlol98
06.12.2020 12:26
вообще не понимаю этот урок...
BlaSta
06.12.2020 12:25
надо(язык с++ или паскаль или си шарп)...
Your0ppa
06.12.2020 12:24
Дан Алфавит в,а,п,р,о. Какова его мощность? *...
СавелийМясоедов777
06.12.2020 12:22
ввести с клавиатуры 40 элементов. определить сколько среди них четных чисел. Вычислить и вывести на экран разность данных элементов. Python...
кар91
06.12.2020 12:22
1. Считая, что вес каждого символа 1 байт оцените в битах объем сообщения: Чернила на 99% состоят из воды.2. Объём сообщения 9 Кбайт. Известно, что данное сообщение содержит 8192символов....
anonymus98
06.12.2020 12:21
Что входит в программное обеспечение компьютера? 1. Периферийные устройства 2. Системы программирования 3. Прикладные программы4. Системные программы5. Аппаратное обеспечение...
PicaChuShiK
06.12.2020 12:20
Сообщение, записанное с алфавита племени Лакки, состоит из 20 символов и имеет информационный обьём - 20 байтов. Найдете мощность алфавита, с которого записано это сообщение....
Alexander169
06.12.2020 12:20
Укажите лишнее. * Антивирусные программы Программы архиваторы Текстовый редактор Программы обслуживания сети...
Популярные вопросы
Present perfect simple, present perfect continuous and past simple 1. jack ……………....
1
Может ли несократимая дробь быть в 179 раз меньше суммы числителя и знаменателя...
1
Сколько по действиям ! 456+487*123+456-975=...
2
Дана ломаная, состоящая из трёх звеньев. длина третьего звена ломаной составляет...
1
Написать небольшое сочинение с метафорами....
2
Напишите краткое сочинение по рассказу левша...
3
Каким образом, по вашему мнению, такая специализация экспорта повлияет на уровень...
1
Write a story for a short story competition ending with the words what an amazing...
1
Правильно ли я решил? только осваиваю теорему виета,отсюда неуверенность...
3
Найти формулы общего члена: а)3/2; 4/3; 5/4; 6/ б)0; 4; 18; в)0,3; 2,5, г)2; -5/2,10/3;...
2
a[i]:=0; i:=1;
while(i<n)do begin
if(i mod 2 <> 0)then begin
a[i]:=1;
g:=i;
inc(i);
end
else inc(i);
end;
for i:=1 to g do
if(a[i]=1)then write(sqr(i),' ');
readln;
readln;
end;