Тест з інформатики, мова паскаль

число-общее

столица росси - единичное

учебник - общее

житель москвы - общее

столица - общее

самая высокая гора - единичное

пушкин - единичное

сказочный персонаж - общее

баба яга- единичное

var 

i,n: integer;

begin

readln(n);

for i: =1 to n-1 do write(i*i: 5);

end.

универсальное питание модема это блок питаник 9v. начиная с 2004 года начали выпускать блоки длительного использование. провода (жилка) двойная красный (+) и синий(бывает белый)  

var n: integer;

begin

  read(n);

  if (n> 99) and (n< 1000) then writeln('yes')

  else writeln('no');

end.