![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() |
21denis12 |
![]()
Сообщение
#1
|
Группа: Пользователи Сообщений: 1 Пол: Мужской Репутация: ![]() ![]() ![]() |
1) Переменные x,y,i,k описаны как
var i, k: integer; x,y: real; Верна ли запись k:= 81; y:= 1; for i:= 1 to sqrt (k) do y:= 2*y; Ответ обосновать 2)Сколько раз выполняется цикл,и что будет выводится на печать? var i, k: integer; k:= 0; for i:= 10 downto 11 do k:= i; write(k); 3)Сколько раз выполняется цикл,и что будет выводится на печать? var i, k: integer; k:= 3; for i:= 3 downto k do k:= i-k; write(k); 4)Сколько раз выполняется цикл,и что будет выводится на печать? var i, k: char; k:= 'z'; for i:= 'a' to 'b' do if k<i then k:= i; write(k); 5)Сколько раз выполняется цикл,и что будет выводится на печать? var f, g: boolean; begin g:= false; for f:= false to g do g:= not f; writeln(g)end. Сообщение отредактировано: 21denis12 - 24.10.2011 18:41 |
![]() ![]() |
![]() |
Текстовая версия | 19.07.2025 18:25 |