Вопрос по информатике:
Запишите на языке Паскаль фрагмент программы, соответствующий блок-схеме.
- 15.01.2015 23:11
- Информатика
- remove_red_eye 16653
- thumb_up 34
Ответы и объяснения 1
Фрагмент организует ввод данных до тех пор, пока не будет введен ноль и подсчитывает количество введенных чисел, значение которых превышает единицу.
var
k,x:integer;
begin
k:=0;
repeat
Read(x);
if x>1 then Inc(k)
until x=0;
Writeln(k)
end.
Тестовое решение:
1 5 -10 3 -8 6 1 2 -7 4 0
5
- 16.01.2015 05:27
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.