Написать программу, согласно варианту, которая по введенному значению аргумента вычисляет зна-чение функции, заданной в виде графика и выводит его на экран. Параметр R вводится с клавиатуры. С использованием оператора if
Паскаль

var

  n,i,z: integer;

begin

  readln(n);

for i: =1 to n do if n mod i=0 then inc(z,i);

writeln(z);

end.

размер объекта- эскиз

форму реального объекта - чертежа

  цвет объекта-рисунка

  элементный состав объекта   -схемы

  отношения между объектами - диаграммы эйлера-венна

  стоимость объекта   -числа

объект-фотографии 

program primer_(число); var (буквы): real или integer;   beginwriteln ('введите что-то'); read (буква); буква: =вычисления; write ('значение выражения=',   буква); end.

p.s. только смотри на знаки, которые я расставила. 

режим дня трудоголика

проснулся- позавтракал- на работу-домой-поужинал и спать

повторить nраз до самой смерти