Составьте программу рисования узора с использованием алгоритма начальное положение робота отмечено символом. вариант 10

Код pascal: var     n,m,i,a: integer; begin read(n); m: =0; i: =0; for n: = 1 to n do       begin       read(a);       if a mod 3 = 0 then             if n > m then                   begin                   i: =m;                   m: =n;                   end       end; if i = 0 then write('нет') else write(i) end.

Если количество чисел не дано, то можно считать, что какое-то значение (например, 0) является признаком конца ввода чисел. для такого случая программа будет такой: #include < stdio.h> int main() {     int a;     int s=0;     printf("вводите числа: ");     scanf("%d",& a);     while (a){       if (a> 0) s = s+a;       scanf("%d",& a);     }     printf("s = %d",s); system("pause");   return 0; } пример: вводите числа: 45-812-37380 s = 95