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

Дана переменная a=0. Пока a<10,Увеличивать её значение на 1 и выводить каждую итерацию слово Дом!!!
Срочно 50 баллов!!!

Ответы

Автор ответа: NaaMan
1

Pascal:

var a:integer;

begin

 a:=0;

 while a<10 do begin

   a:=a+1;

   write('Дом ');

 end;

end.

Кумир:

алг

нач

  цел а

  а:=0

  нц пока а<10

     а:=а+1

  вывод "Дом "

  кц

кон

Приложения:
Интересные вопросы
Предмет: Русский язык, автор: rusmarselenov12
Предмет: Қазақ тiлi, автор: Аноним
Предмет: Русский язык, автор: rusmarselenov12
Предмет: Алгебра, автор: Мари7890