Войти Регистрация Спроси ai-bota

Дано целое число n. вывести все целые числа от 1 до n в обратном порядке pascal

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

Egor456803

30.12.2020 11:18

Pascal. , , исправить ошибку. оптимизировать код и т.п. не мне только надо заставить этот код работать правильно, все остальное я уже сделаю сама. сама программа должна по...

ParaDoksalS

30.12.2020 11:18

Как потому что происходит в моей местноти можно определить что земля имеет форму шара...

chesht

01.12.2021 01:47

На рисунке показано, как надо подготовиться к уроку рисования. 1. составь алгоритм подготовка к уроку рисования . 2. отметь любые два шага, которые можно поменять местами....

2K99

27.06.2020 10:36

Статья, набранная на компьютере, содержит 10 страниц, на каждой странице 32 строки, в каждой строке 56 символов. в одном из представлений unicode каждый символ кодируется...

bokovanatap08wlj

22.08.2020 02:22

Нужно решить данные . буду признателен. 1. составьте программу ввода и вывода массива: 3,4,-9,8,1,-6,2,-5,-1,7,5,9. 2. составьте блок-схему алгоритма и программу вычисления...

Nastya348624

06.08.2020 19:11

Решите две программы s=(a+b)*h/(типо дробь)2 y=2x’2(типо маленькая 2 сверху)+4abc...

Slaeran

15.07.2021 05:20

Найдите верные условия: 1) =если(А=5;В4*2;В4+10) =если(А=5;В4*2;В4+10) =если(А1=5;В4*2;В4+10) =если(А=5;В4*2;В4+10;D4+2) 2) =если(Л3=5;В4*0,12;В4*0,1) =если(А3=5;В4*0,12 и...

Ivanova567

03.09.2022 09:36

Даю 27 б Задача №1: составить программу для вычисления значения функции по одной из формул Программа: CLS REM Значение функции INPUT «Введите a, b, k»; a, b, k IF a =-1 THEN...

blowwwwwwww

04.10.2020 22:57

сделать задание по информатике на с++ 1)Описать в виде структуры следующие понятия: a) дата (число, месяц, год); b) адрес (страна, город, улица, дом, квартира); c) треугольник...

Vitaliano2004

19.01.2020 16:53

Если все карандаши разложить в 6 коробок,по 12 карандашей в каждую,то останится 8 карандашей.сколько потребуется коробок, если в будут раскладывать по 10 карандашей?...

Ответ:

daniabloger

16.08.2020 09:17

Var

n, i: integer;

begin

readln(n);

for i := n downto 1 do

write(i, ' ');

end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку