Сделать чередование звуков в словах: день,работать,удивление,гудок.заранее !

Var a,b,c,prime: longhint; begin writeln('введите число'); readln(a); c: =a; for b: =1 to a do begin   if (c mod b=0) then prime: =prime+1; end; if (prime> 2) then writeln('число не  простое') else writeln('число простое  '); end. 

А)Миллиард (но это не точно)

Он-это подлежащее,
припоминал-это сказуемое,
Сон,время,всех,деталях-это дополнение,
Некоторое-это обстоятельство.

Сегодня я сначала сделала зарядка утром, когда я открыла дверь то мой кот нежданно
прыгнул на меня тогда я отлично поняла что он меня любит
ЗАтем я пошла на кухню как обычно я регулярно делаю завтрак маме и папе
Когда я готовила завтрак то мне позвонила подруга и позвала гулять я по-доброму объяснила ей что я не смогу погулять.
но она упорно звала меня и тут внезапно проснулся папа и сказал
-Иди погуляй на улице хорошо