Войти Регистрация Спроси ai-bota

Составте алгоритм для вычисления суммы 100 чисел

Показать ответ

Ответ:

Татьяна06111

21.06.2020 02:20

Var a,b,c:integer;
begin
for a:=1 to 100 do
begin
if a mod 2=0 then b:=b+a
else
c:=c+a;
end;
writeln(b);
write(c);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

adv00

28.01.2023 15:58

Перевести число 122 в 2-ичную, 8-ричную, 16-ричную систему...

anyBeef

28.01.2023 15:58

№252. степень для отрицательного показателя напишите рекурсивную функцию, возводящую число a в степень n. гарантируется, что все числа помещаются в стандартные вещественные...

sparksfiyfdgghffgg

28.01.2023 15:58

1)вывести все натуральные числа от 100 до 200 кратные 7...

ZHANSAYA20061

15.04.2023 02:34

Выберите из списка название систем программирования 1.BIOS 2.Windows 3.С++ 4.Paint 5.Linux 6.Паскаль 7.Антивирусы 8.Кумир 9.Assembler...

жироввадим

11.07.2020 04:23

Дан целочисленный массив любой длины, сформировать новый массив из его первых 2 элементов. Если массив меньше длины 2, вывести этот массив. Без const...

ggix

31.12.2020 23:14

Дан массив z(3,4).поменять в массиве второй столбец с четвёртым и вывести исходный массив и преобразованный в виде матриц...

uliaiachnovetz

25.04.2021 23:11

С каких инструментов выполнен рисунок? Прямоугольник ⇒ Вращение Прямоугольник ⇒Переместить Прямоугольник ⇒ Вдавить/Вытянуть Прямоугольник ⇒ Сдвиг...

Ren484

15.08.2020 11:57

1.В массиве A (1:3, 1:3) элементы главной диагонали поставить на место соответствующих элементов первого столбца и определить сумму угловых элементов (a11, a13, a31, a33)....

annakara0491

17.03.2023 14:53

Составить программувычисления значений мне нужно отправить их сегодня...

vikapataeva

03.10.2021 16:28

Веб-анимационалган бетти калай коямыз...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку