Вопрос по информатике:
С клавиатуры вводится натуральное число К. затем последовательно вводятся К чисел с плавающей точкой,не превышающей 10. Найти сумму этих чисел и наименьшее из них
программа на паскале
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 18.11.2017 10:54
- Информатика
- remove_red_eye 14805
- thumb_up 9
Ответы и объяснения 2
Var g:array[1..100] of integer;var k,i:integer;min,s:integer;beginreadln(k);for i:=1 to k dobeginreadln(g[i]);write(g[i]:3);end;writeln;s:=0; min:=10;for i:=1 to k dos:=s+g[i];for i:=1 to k dobeginif (min
- 19.11.2017 06:06
- thumb_up 10
Var k,i: integer;
b,s,min: real;
begin
write('целое число: ');
readln(k); s:=0; min:=10;
for i:=1 to k do
begin write('число: ',i,' '); readln(b);
while b>10 do
begin
writeln('число должно быть меньше 10');
write('повторите ввод: ');
readln(b);
end;
if b
end;
writeln('сумма чисел = ',s);
writeln('наименьшее число = ',min);
end.
- 20.11.2017 23:47
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.