Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
anderson9090
0 / 0 / 0
Регистрация: 27.06.2014
Сообщений: 4
1

Используя 3 разных цикла вывести на экран цифры от 1 до 9 в обратном порядке

27.06.2014, 19:56. Просмотров 704. Ответов 3
Метки нет (Все метки)

Просьба помочь в решении задания

исполоьзуя 3 разных циклов вывести на экран цифры от 1 до 9 в обратном порядке
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.06.2014, 19:56
Ответы с готовыми решениями:

Линейные алгоритмы. Вывести на экран число, расположив его цифры в обратном порядке
16. Дано двухзначное число. Вывести на экран число, у которого цифры...

Рекурсия. Вывести в обратном порядке цифры целого положительного числа n
Составить рекурсивную процедуру,которая выдает на печать в обратном порядке...

Как вывести элементы массива в обратном порядке без введения второго цикла ?
Задание 8.2 со стр. 137 книги «Паскаль для школьников», 2005 г. Ушаков, ...

Вывести на экран массив в обратном порядке
Решить: Создать массив с именем А из 10-ти элементов, задав значения его...

Вывести массив на экран в обратном порядке
вывести массив на экран в обратном порядке его элементов

3
genernet
10 / 10 / 7
Регистрация: 19.03.2014
Сообщений: 25
27.06.2014, 20:33 2
Лучший ответ Сообщение было отмечено anderson9090 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
program lab;
uses crt;
var i:byte;
begin
clrscr;
i:=9
while i>0 do
begin
  write(i,' ');
  dec(i);
end;
readkey;
end.
Pascal
1
2
3
4
5
6
7
8
program lab;
uses crt;
var i:byte;
begin
clrscr;
for i:=9 downto 1 do write(i,' ');
readkey;
end.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
program lab;
uses crt;
var i:byte;
begin
clrscr;
i:=9;
repeat
  write(i,' ');
  dec(i);
until i<1;
readkey;
end.
1
anderson9090
0 / 0 / 0
Регистрация: 27.06.2014
Сообщений: 4
27.06.2014, 20:36  [ТС] 3
Спасибо
0
tomb2002
32 / 32 / 43
Регистрация: 07.02.2014
Сообщений: 89
27.06.2014, 20:36 4
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Program pascal;
USES CRT;
Var
i : byte;
BEGIN
clrscr;
WriteLn('Используем цикл For Downto DO');
For i:=9 downto 1 do
write(i:2,' | ');
ReadLn;
WriteLn('Используем цикл While DO');
i:=9;
while i <> 0 do
  begin
    write(i:2,' | ');
    dec(i)
  end;
ReadLn;
i:=9;
WriteLn('Используем цикл Repeat Until');
Repeat
  write(i:2,' | ');
  dec(i);
Until i=0;
Writeln;
Readkey
END.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.06.2014, 20:36

Вывести элементы массива на экран в обратном порядке
Вывести элементы массива на экран в обратном порядке

Массивы символов: вывести на экран в обратном порядке
Создать массив символов размеростью 20, вывести на экран в обратном порядке.

Вывести на экран элементы списка в обратном порядке
Вывести на экран элементы списка в обратном порядке. Входные данные: N –...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru