1. Информатика
  2. Составьте программу на языке Паскаля

Составьте программу на языке Паскаля


Составьте программу на языке Паскаля

RomanReigns2000 RomanReigns2000    2   27.05.2021 11:27    0

Ответы
sacha0457 sacha0457  26.06.2021 11:29

Free Pascal

var

 x,y:integer;

begin

 x:= 10;

 y:=2;

 repeat

   x:= x-2;

   y:=y-2;

 until x<=-2;

 writeln(x, y);

end.

>>> -2   -10

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Федёк5 Федёк5  25.07.2019 16:40
Составь алгоритм подготовка к уроку рисования а.отметь любые два шага, которые можно поменять местами...
grigormehrabyaoyl8pz grigormehrabyaoyl8pz  25.07.2019 16:40
найти среднее арифметическое от 1 до n. 2. найти среднее арифметическое целых,чётных,кратных 3 чисел от 1 до n/ 3. найти произведение чисел от 1 до n/...
Arina456895 Arina456895  29.04.2020 17:30
решить задачу Алфавит некоторого племени состоит из 8 символов. Сколько бит информации несёт написанное с этого алфавита сообщение, состоящее из 56 символов...
alechka7 alechka7  29.04.2020 14:47
Напишите программу, которая получает случайное целое число- 0 или 1, а затем выводит цепочку из 10 знаков - , если получено число 0, и цепочку из 10 знаков + , если...
likamikanumberone likamikanumberone  01.04.2021 08:58
. ответ должен быть точным. ​...
VikaKhudyakova VikaKhudyakova  01.04.2021 08:59
5. У змінній letters міститься список [2, 4, 6, 8, 10]. Як присвоїти значення zero в якості третього елемента даного списку?...
vuhopen vuhopen  01.04.2021 09:00
Як описати масив а з цілих 25 чисел...
Flashvinchester Flashvinchester  01.04.2021 09:00
У змінній letters міститься список [ a , b , c , d ]. Яке значення виразу letters[-1]?...
olyapcomplex olyapcomplex  01.04.2021 09:01
Як буде виглядати список, який зберігається у змінній metering = [3.14, inch , 2.54, inch , True], після виконання команди metering.append(99)?...
deniskamikhalcozvly4 deniskamikhalcozvly4  27.04.2020 13:23
Люди,Как очистить диск с на пк​...

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