Var A,i : Longint;
Begin
Readln(A);
For i:=1 to A do If A mod i = 0 then Writeln(i);
end.
Нужен учебник, так ничего не сказать :)
Если это задание информатичке понесёшь, то пиши что-то вроде этого:
"30 декабря в Москве собрались уполномоченные делегации советских социалистических республик, которые утвердили Договор и Декларацию об образовании Союза Советских Социалистических республик (СССР)" - это словесная модель исторического события.
№1
Информация- сведения о чем-либо, независимо от формы их представления.
Способы восприятия:
1) Визуальная (Картина)
2) Звуковая (Опера)
3) Тактильная ( Физические контакты, там толчки, удары, хлопки )
4) Обонятельная ( Аромат цветов )
5) Вкусовая ( Вкус банана. лимона и т.д.)
№2
Визуальный, так как мы, видим этот график.
См файл
за январь нет оплаты так как нет предыдущих показаний
Excel таблицы не прикрепляются