Предмет: Информатика, автор: ukoroleva980

Помогите пожалуйста. Выведите числа от 18 до 10. (цикл while)Пожалуйстаа-а-а!​

Ответы

Автор ответа: gfhjkmgfhjkm20
0

Ответ:

program Chernovik;

var i: integer;

begin

i:=18;

while i>9 do

begin

write(i,' ');

i:=i-1

end

end.

ukoroleva980: спасибо
Предыдущий вопрос
Следующий вопрос
Интересные вопросы
Предмет: Алгебра, автор: АняБелЛ
решите уравнения
1/x+1/x-1=5/6
2 года назад
Предмет: Математика, автор: clender
Из чисел 16, 24, 45, 37, 65 выбери при делении которых на 7 в остатке получается 3. Выполни запись деления с остатком.
2 года назад
Предмет: Математика, автор: Sotkacar
За два дня проложили кабель.В первый день-68% кабеля,а во второй-на 115,2м меньше,чем в первый. Сколько всего метров кабеля проложили за два дня? Сколько метров кабеля проложили в первый день?
2 года назад
Предмет: Литература, автор: dasasvoboda10
Составьте список сказок л.н. толстого.


Авторские- 2 сказки, в пересказе- 2 сказки, в обработке - 2 сказки
8 лет назад
Предмет: Музыка, автор: dianatumen69
Написать сочинение "Почему, тема любви, вечна в искусстве"
8 лет назад