tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составьте программу вычисления
Составьте программу вычисления суммы нечетных чисел в диапазоне от 1 до 100
urkashkz777
2 12.06.2019 19:50
21
Ответы
maratuk2957oxmbqd
10.07.2020 07:26
Var
i,sum:integer;
begin
sum:=0;
for i:=1 to 100 do
if (i mod 2<>0) then
sum:=sum+i;
write(sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
123123123131
21.05.2019 05:30
Паскаль 10 класс! дан массив а(n). определите кол-во нечетных элементов массива, стоящих на четных местах. выведите на экран исходный массив и найденное кол-во....
помогите1185
21.05.2019 05:30
Написать программу, которая запрашивает у пользователя номер дня недели и выводит одно из сообщений: «рабочий день», «суббота», «воскресенье», или «такого дня не существует»....
mamariti
21.05.2019 05:30
)составить программу на языке pascal, которая позволяет ввести с клавиатуры целое трехзначное число, проверяет, симметрично ли оно, и печатает сообщение на экране. (трёхзначное число...
nat17akan
21.05.2019 05:30
Составить программу на языке pascal, которая позволяет ввести с клавиатуры 10 любых чисел, вычисляет и выводит на экран сумму только положительных из них....
mprodeus99p0812l
21.05.2019 05:30
Конец семестра, я в завале : ( 1) написать программу, которая по вводимому числу от 1 до 11 (номеру класса) выдаёт соответствующее . например, если k=1 - «, первоклассник» , если...
elinapak
21.05.2019 05:40
Вкодировке ascii на каждый символ отводится 1 байт. определите информационный объём сообщения в этой кодировке...
HomelessGod1
21.05.2019 05:40
)составьте программу вычисления суммы 180 первых членов арифметической прогрессии если а1=-100 d=0,4...
максаткайрат
21.05.2019 05:40
Запишите в развернутом виде числа: а)а8=143511; б)а2=100111; в)а16=143511; г)а10=143,511; д)а8=0,143511; е)а16=1аз,5с1....
Guru2002o6
21.05.2019 05:40
Стестами по ! а1. определите значение целочисленных переменных a и b после выполнения фрагмента программы: a : = 3 + 3*4; b : = (a div 10) + 4; a : = (b mod 10) + 2; b: = a + b;...
sopyryaeva1976
21.05.2019 04:44
(язык программирования c#) дана последовательность чисел a1, a2, an, вывести на печать только те числа, для которых ai i...
Популярные вопросы
Решите уравнения с объяснениями ...
1
Знак сульфида, назавите элемент, укажите положение в таблице и электронное строение...
3
Даносившийся из комнаты музыка радовала слух. синтаксический разбор ...
3
Запиши другой вычисления (5*2)+(5*3)=...
2
Составить электронные уравнения, расставить коэффициенты....
1
Скласти програму мовою pascal....
3
Эссе на тему любой труд нелёгок не из интернета ...
3
Утрапеції авсд середня лінія ер перетинає діагональ ас у точці к. різниця відрізків...
3
14.2. найдите а и s, если: 1) а = 5, d = 3 и п = 14; 2) а = 12, d = 7и п = 24;...
3
Прекрепить фото с чертежом и решением...
3
i,sum:integer;
begin
sum:=0;
for i:=1 to 100 do
if (i mod 2<>0) then
sum:=sum+i;
write(sum);
end.