1. Информатика
  2. Паскаль ввести несколько чисел.

Паскаль ввести несколько чисел. найти сумму чисел лежащих в интервале от 10 до 15

inga20062 inga20062    3   23.06.2019 08:00    0

Ответы
Molina1234 Molina1234  19.07.2020 09:54
Var i,b,c:integer;
begin
for i:=1 to 10 do begin
readln(b);
if (b>10) and (b<15) then c:=c+b;
end;
writeln(c);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
рудный1 рудный1  19.09.2019 04:50
Стадион вмещает m зрителей, билет на футбольный матч стоит p рублей. определить выручку стадиона, если известно, что стадион был заполнен болельщиками на четыре пятых. составить...
Reginalolo Reginalolo  19.09.2019 04:50
Среднее значение четырёх чисел равно одной четверти суммы этих четырёх чисел. написать программу, которая находит среднее значение этих четырёх чисел...
grskdarina grskdarina  19.09.2019 04:50
Составить программу, которая в процессе беседы с пользователем, выясняет сколько ему лет...
Wenros Wenros  19.09.2019 04:50
Впервый день лыжник пробежал 3 км. , каждый следующий день он прибавлял по пол. км. составить программу, которая находит через сколько дней его суммарный пробег превысет 50 км....
КириллFace КириллFace  08.03.2019 00:20
Вклетки эт введены следующие формулы: a1=8 a2=a1*10 a3=a2-a1 b1=a2/4 b2=(b1-a1)/6 вычислите значения, которые будут отображены на экране в клетках эт....
Yana6hhhh Yana6hhhh  08.03.2019 00:20
Заданы 3 числа. имзвестно , что дваиз них равны между собой , а третье отлично от них.составьте программу для нахождения числа , отличного от других...
Назым011 Назым011  08.03.2019 00:20
Чему равна переменная к после следующих действий: s: =5; k: =s+10; k: =s+k; s: =2*k. а) 20 б)40 в)5 г)15...
зайка583 зайка583  12.09.2019 16:10
Составь словосочетание со словом растолченый...
Kotvo4cah Kotvo4cah  12.09.2019 16:10
Создать текст на тему «мой чудесный день», употребив безличные глаголы...
Сонькамя Сонькамя  12.09.2019 16:10
Надо видилить окончайние в слове подруга,доктор и плошать...

Популярные вопросы