1. Информатика
  2. Составьте программу

Составьте программу на языке паскаля. даны 10 чисел .найти сумму чисел , которые не меньше 5.

elenshv elenshv    3   13.09.2019 02:50    0

Ответы
samnsk100617 samnsk100617  07.10.2020 10:57
Program z1;Var Sum, a, i:integer;BeginSum:=0;5for i:=1 to 10 do begin   read(a);   if (a>=5) then Sum:=Sum+a;   end;writeln(Sum);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
DPAKOSHKA DPAKOSHKA  13.04.2021 15:01
Зробіть необхідні розрахунки. Порахуйте показники лічильника за кожен місяць, визначте скільки потрібно сплатити, враховуючи субсидію, підведіть підсумок того, скільки абонент...
BlaBla552 BlaBla552  05.11.2020 13:07
1. Какие виды интерфейса обеспечивает ОС? А. Интерфейс командной строки, интерфейс главного менюБ. Интерфейс командной строки, графический интерфейсВ. Интерфейс командной строки,...
yakymov yakymov  05.11.2020 13:07
На які види поділяються загрози інформаційній безпеки​...
афкашник афкашник  05.11.2020 13:06
Определите значение переменной S после выполнения операторов: i:=0; S:=0 нц пока i 3 i:=i+1; S:=S+i*i кц...
АнютаП1 АнютаП1  05.11.2020 13:06
Паскаль. Написать программу, которая формирует новый массив С, из массива А все элементы стоящие на четных местах, а из В элементы стоящие на нечетных местах. Размеры массивов...
nastea3377 nastea3377  05.11.2020 13:06
оле нужно с электронных таблиц построить таблицу значений формулы 5х–3у для значений х и у от 2 до 5. Для этого сначала в диапазонах В1:Е1 и А2:А5 он записал числа от 2 до 5....
филосов00 филосов00  20.04.2020 21:18
Amd radeon 7600m нормальная видеокарта или нет?​...
ReyLiv ReyLiv  20.04.2020 21:18
На сервере info.ru находился файл dog.pdf, доступ к которому осуществлялся по протоколу ftp. Фрагменты адреса данного файла закодированы буквами А, Б, В, Г, Д, Е, Ж. Запишите...
Vladiko011 Vladiko011  20.04.2020 21:18
Https://ppt-online.org/87327, в Microsoft Word створити маркерований список в таблицi....
алмаз122 алмаз122  20.04.2020 21:18
Распределите выражения в соответствии с типом результата. Integer Real String Boolean 0.6 * 5 ‘integer’ 6 mod 5 div 10 5 = 2 5+2 = 5 35 div 10 24 / 6 3*12...

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