Дана последовательность чисел оканчивающихся на 0 найти сумму и произведение этих чисел(Нужно написать программу в Паскале, с помощью команд count, while)

Python 3:
for x in range(1, 10):
    print(*[x*y for y in range(1, 10)], sep=" ")

Так, зачем тебе guess != secret в условии цикла?

Задача а
program a;var   i:integer;  a:array[-5..11] of integer; begin  randomize;  for i:=1 to 11 do begin    a[i]:=random(10)-5;    if a[i] mod 5 = 0 then a[i]:=5 else a[i]:=a[i]*5;    write (a[i],);    end;end.Задача б
program b;var   i:integer;  a:array[1..12] of integer; begin  randomize;  for i:=1 to 12 do begin    a[i]:=random(20);    if a[i] mod 2 = 1 then write (a[i],);    end;end.

1 дюйм = 2,54 см
9 см * 12 см ≈ 3,54 дюймов * 4,72 дюйма
Количество точек сканированного изображения = 600*600*3,54*4,72 = 6015168
737 Кбайт = 737*1024 байт = 737*1024*8 бит
Память для одной точки = 737*1024*8 / 6015168 ≈ 1 бит
Палитра состоит из 2^1 = 2 цветов