logo
Войти Регистрация Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
умно55567
умно55567
24.08.2021 23:36 •  Информатика

Составить программу для определения произведения квадратов чисел 1,3, (оператор for)

Ответ:
Gosha22228888
Gosha22228888
11.06.2020 04:38

var
    i,s:integer;
Begin
    s:=1;
    for i:= 1 to 15 do
        if i mod 2=1 then s:=s*i*i;
    writeln(s);
End.
       

0,0(0 оценок)
Популярные вопросы: Информатика
geraveselov20
geraveselov20
18.03.2022 13:18
Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 4 раза? i: =; while i =3 do begin writeln( ! ); i: =i-1; end;...
gaasvaleria
gaasvaleria
31.05.2022 14:48
Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 3 раза? i: =4; while i = do begin writeln( ! ); i: =i-1; end;...
gabadunka
gabadunka
11.04.2021 04:24
Дан одномерный массив a[n]. известно что в нём имеется 0. найти сумму всех элементов включительно до 0. в паскале...
Sofa22Bas
Sofa22Bas
05.08.2022 17:59
Проверить: имеются ли среди трех целых чисел два положительных значения блок-схема нужна...
катуааа
катуааа
08.08.2022 15:22
Вычислить корни квадратного уравнения общего вида ах² вх с=0для всех 3 случиях...
epincessg11
epincessg11
20.06.2020 22:25
Решить по информатике, . с объяснениями. , джеффу и хоггарту предъявлено обвинение всоучастии ограбления банка. кроме того, ещѐ один подозреваемый пока не был найден. на следствии...
anastasiya2905
anastasiya2905
02.04.2020 01:26
Можете решить и объяснить как это делать. Заранее...
SharkKinger
SharkKinger
30.08.2020 21:52
Решите, по ! только с дано, формулами итд: )...
Котик2525
Котик2525
17.05.2020 04:22
Племя мульти пишет письма, пользуясь 16-символьным алфавитом. племя пульти пользуется 32- символьным алфавитом. вожди племен обменялись письмами. содержащими одинаковое количество...
landeshforever
landeshforever
21.12.2020 06:56
Ложусь в 12 часов ночи, нужно проснуться в 6 утра. сколько минут я сплю? pascal. без массивов, заранее огромное ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?