Страница 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
" писал(а):Не просто ЦИФРА, а цЫфра
Люди, пишите грамотно и понятно!
Это издевательство такое=) Типа цыфырка=)
Re: Пару задачек по Паскалю, помогите если не тяжело...
Добавлено: 01 июн 2008, 12:21
Aigerim
помогите если не сложно.дана двух значная цыфра. есть ли в этом составе цыфра а.
Re: Пару задачек по Паскалю, помогите если не тяжело...
Добавлено: 01 июн 2008, 12:53
Aigerim
найти квадрат слогаемых всех цельных чисел начиная с а до 50
Re: Пару задачек по Паскалю, помогите если не тяжело...
Добавлено: 01 июн 2008, 15:24
Denys
" писал(а):помогите если не сложно.дана двух значная цыфра. есть ли в этом составе цыфра а.
Код: Выделить всё
if (n div 10 = a) or (n mod 10 = a) then
writeln('Da');
Re: Пару задачек по Паскалю, помогите если не тяжело...
Добавлено: 01 июн 2008, 16:03
MOTOCoder
Aigerim писал(а):найти квадрат слогаемых всех цельных чисел начиная с а до 50
Ничего непонятно, пишите яснее.