Страница 2 из 4

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 31 май 2008, 01:20
MOTOCoder
Aigerim писал(а):помогите решить задачу. дана трех значная цыфра.если поменять места первой и второй цыфры,что получится


[syntax='Delphi']
Writeln(((N div 10)mod 10),N div 100,(N mod 100)mod 10);
[/syntax]

Что, сложно? ))

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 31 май 2008, 15:04
Medved
А как это - трехзначная ЦИФРА?

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 31 май 2008, 15:30
BHy4ok
Medved писал(а):А как это - трехзначная ЦИФРА?

Думаю что так: 100-999

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 31 май 2008, 16:20
MOTOCoder
Medved писал(а):А как это - трехзначная ЦИФРА?


Не просто ЦИФРА, а цЫфра :)
Люди, пишите грамотно и понятно!

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 31 май 2008, 16:47
Medved
Вы юмор не поняли=) Цифра - это один символ...

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 31 май 2008, 16:48
Medved
&quot писал(а):Не просто ЦИФРА, а цЫфра
Люди, пишите грамотно и понятно!
Это издевательство такое=) Типа цыфырка=)

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 01 июн 2008, 12:21
Aigerim
помогите если не сложно.дана двух значная цыфра. есть ли в этом составе цыфра а.

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 01 июн 2008, 12:53
Aigerim
найти квадрат слогаемых всех цельных чисел начиная с а до 50

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 01 июн 2008, 15:24
Denys
&quot писал(а):помогите если не сложно.дана двух значная цыфра. есть ли в этом составе цыфра а.

Код: Выделить всё

if (n div 10 = a) or (n mod 10 = a) then
  writeln('Da');

Re: Пару задачек по Паскалю, помогите если не тяжело...

Добавлено: 01 июн 2008, 16:03
MOTOCoder
Aigerim писал(а):найти квадрат слогаемых всех цельных чисел начиная с а до 50


Ничего непонятно, пишите яснее.