Вопрос по информатике:
Определить значение переменной y после выполнения следующих фрагментов программы:
1. Var y:real;k:integer;
Y:=1.5; for k:= to do y:=y-k;
2. Var y:real; k:integer;
Y:=2;for k:=4 downto 1 do y:=y*k;
3. Var y: real; k: integer;
Y:=0; for k:=1 to 3 do begin y:=y+1; y:=y+k end;
4. Var y: real; k: integer;
Y:=0; for k:=4 to 6 do y:=y+k; y:=y/10;
5. Var y: real;k:integer;
Y:=1; k:=5;
While k>2 do k:=k-1; y:=y+k*k;
6. Var y:real;k:integer;
Y:=1; k:=2;
Repeat k:=2*k; y:=y+k until k>5;
7. Var y:real; k:integer;
Y:=1; k:=1;
While k<5 do k:=k+1; y:=y+1*k
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 04.05.2016 12:33
- Информатика
- remove_red_eye 18730
- thumb_up 27
Ответы и объяснения 1
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.