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

Напишете на паскале. 1. найти сумму чисел от 10 до 20.

Ответ:

TikhonOFF

06.07.2020 10:39

Var
s,i:integer;
begin
s:=0;
for i:=10 to 20 do
s:=s+i;
writeln(s);
end.

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

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

катарина68

17.09.2022 13:20

В таблице Dat представлены данные о количестве заказов, принятых фирмой «Конфетти» в первой декаде февраля (Dat[1] — число заказов, принятых первого февраля; Dat[2] —...

lizapustyreva07

07.04.2022 19:37

В программе «:=» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операций...

Yarik200825

02.03.2020 13:12

Чтобы найти ключи от работы маше нужно пройти от дома 50 метров на север далее 100 метров на восток потом 20 метров на юг 40 на запад и 30 на юг ключи находятся в 60 метрах...

KseniaSamarskaia15

30.06.2021 14:03

Три друга андрей, сергей и дмитрий живут в одном трех этажном доме, но на разных этажах. у каждого из мальчиков есть хобби: один из них заядлый театрал, другой занимается...

Chelovechena1

10.06.2020 10:37

Графическое растровое изображение объем 5,61 мб содержит в себе 65536 цветов. найти общее количество точек...

дашик27

23.09.2022 01:10

Условный оператор if a mod 2 =0 then write (a); печатает 1 четное число 2 двузначное число 3 целое число 4 простое число...

catttttttttttttttttt

27.03.2022 14:17

Как удалить программу fences? ...

gladkova2002d

08.07.2022 23:49

(a& b& c)∨a& b& c как это сокращать...

IamInga18

16.12.2020 04:38

Что делать если при восстановлении или перестановки системы виндовс 8 пишет ошибку типо не завершено или отказано в что делать?...

Анимешник0

16.10.2020 05:13

Написать программу которая сортирует одномерный массив методом простого выбора в порядке возрастания на с++...

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

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