Составить программу формирования массива,элементами которого являются цифры числа n

@lexx66 · Регистрация: 21.06.2011

Люди,прошу вас помогите решить задачки по паскалю:
1)Дано натуральное число n.Составить программу формирования массива,элементами которого являются цифры числа n.
2)Дана строка.Указать те слова,которые содержат хотя бы одну букву f.
3)Написать программу построения графика функции f(x) так,чтобы участки графика,на которых f(x)< 0 и участки,на которых f(x)>0 окрашивались в разный цвет.
Заранее большое спасибо за помощь!

@lamed · 21.06.2011, 22:33

Pascal

{ Дано натуральное число n. Сформировать массив, элементами которого являются цифры числа n. }
{ PascalABC.NET, lamed, 21.06.2011 }
const
  MaxN = 20;
var
  i, j, x, n: integer;
  a: array[1..MaxN] of integer;
begin
  writeln(MaxN);
  readln(n);
 
  x:= n;
  i:= MaxN;
 
  while (i>=0) and (x>0) do
    begin
      a[i]:= x mod 10;
      x:= x div 10;
      dec(i);
    end;
 
  for j:= i+1 to MaxN do
    a[j-i]:= a[j];
 
{  if (i=MaxN) then
    write(0)
  else }
    for j:= 1 to MaxN-i do
      write(a[j]);
  writeln;
end.

@lexx66 0 / 0 / 0 Регистрация: 21.06.2011 Сообщений: 7
		1
	Составить программу формирования массива,элементами которого являются цифры числа n 21.06.2011, 22:05. Показов 2387. Ответов 1 Метки нет (Все метки) Люди,прошу вас помогите решить задачки по паскалю: 1)Дано натуральное число n.Составить программу формирования массива,элементами которого являются цифры числа n. 2)Дана строка.Указать те слова,которые содержат хотя бы одну букву f. 3)Написать программу построения графика функции f(x) так,чтобы участки графика,на которых f(x)< 0 и участки,на которых f(x)>0 окрашивались в разный цвет. Заранее большое спасибо за помощь! 0

Опции темы

Составить программу формирования массива,элементами которого являются цифры числа n

Решение