Потому что ты уже много раз менял, если так пишет то жди пока провериться! !
Var a : integer;
begin
a:=random(98)+2 ;
write(a)
end.
Ответ номер 1) 14. Графическое решение на прилагаемом рисунке.
Высказывание - предложение, которое может быть истинным или ложным.
<span>а) Все натуральные числа целые. - истинное высказывание
</span><span>б) Существуют ли белые слоны? - вопросительное предложение не является высказыванием.</span>
int main ()
{
int a[20];
int n, i;
n = 20;
for (i = 0; i < n; i++)
*(a + i) = i*(3 * i);
for (i = 0; i < n; i++)
printf ("%d ", *(a + i));
printf("\n");
for (i = 1; i < n - 1; i++)
*(a + i) = (*(a + i - 1) + *(a + i) + *(a + i + 1))/3;
for (i = 0; i < n; i++)
printf ("%d ", *(a + i));
printf("\n");
}
Как то так, но не уверен.