tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
1) найти произведение
1) найти произведение чисел на промежутке [41,76] 2) даны числа от 34 до 298. найти количество чисел, кратных 7.
Tokalexandra
3 28.06.2019 17:30
0
Ответы
МарянДансер
22.07.2020 20:59
1) var p,i:integer;
begin
p:=1;
for i:=41 to 76 do
p:=p*i;
writeln(p);
end.
2) var k,i:integer;
begin
k:=0;
for i:=34 to 298 do
if i mod 7 = 0 then
k:=k+1;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
areg122004
12.04.2020 12:48
Постройте таблицы истинности для следующих логических выражений ...
borz2006
12.04.2020 12:47
Дан массив из 20-ти элементов - случайных целых чисел в диапазоне от 20 до 70 Найти в этом массиве минимальное чётное число и минимальное нечётное число. Паскаль...
subbotkinaira
12.04.2020 12:47
Дано описание массива:vara : array[1..n] of integer; Выбери, какие элементы массива подходят. −5−11 −3.44.4 среда четверг суббота...
sanyaleleckov
12.04.2020 12:47
В заданном массиве х1,х2...,хn изменить значение всех положительных элементов умножив их значение на К а отрицательные элементы уменьшить вдвое при этом подсчитать...
cfr1
12.04.2020 12:47
В языке за некой поисковой машины для обозначения логической операции ИЛИ используется символ «|», а для логической операции И — символ «&». Известны за и количество...
MeowthCopyright
12.04.2020 12:47
решить :( Пользователь вводит последовательность натуральных чисел. Их количество неизвестно. Пользователь завершает ввод чисел набрав число, большее 1000. После...
sicrettry
13.06.2019 04:10
Сколько различных слов в племени тумбо-юмбо,если нужно всего 5 бит,чтобы закодировать каждое слово? только пишите с решением...
alekshaino
13.06.2019 04:20
Для кодирования нотной записи используется 13 значков. каждый значок кодируется одним и тем же минимально возможным количеством бит. чему равен информационный объем...
саня1362
07.03.2022 05:04
Как понять сколько значащих нулей в восьмеричной записи числа?...
ffggshwheehejsj
16.11.2019 09:20
1. реляциялық мәліметтер қорын не үшін excel-де құрады? 2. кесте тақырыбы мен арасында бос жол қалдыруға болады ма? excel-де бос жолды қалай өшіруге болады? 3....
Популярные вопросы
Заполните пропуски и продолжите деление 2 ׃ 0,5 = … ׃ 5 = 2,6...
3
3 2.12 Listen to four conversations,and say what the people...
2
Чому в мене все на англійській...
1
Убежал от кого? (от меня), подбежал к кому? (я), услышал кого?...
1
В параллелограмме ABCD заданы: вершина С (6; -8;5) и векторы...
2
Обозначьте на рисунке А и б цифрами 1, 2, 3, 4 следующие органоиды...
1
Ришити уравнения (3x+4)-(3x-1)(3x+1)=41...
1
Що таке географічне положення...
2
4. Төмендегі мақал-мәтелдердің мағынасын түсіндіріңдер. Жеті...
3
1 Look at the pictures of the people. Choose one and describe...
1
begin
p:=1;
for i:=41 to 76 do
p:=p*i;
writeln(p);
end.
2) var k,i:integer;
begin
k:=0;
for i:=34 to 298 do
if i mod 7 = 0 then
k:=k+1;
writeln(k);
end.