1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| malou |
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 5 Пол: Мужской Репутация: 0 |
Помогайте решить пожалуйста с помощью case div mod.
2. Постановка задачи :Для числа «к» вывести на экран дисплея разу «мы нашли К грибов в лесу» согласовав окончание слова «гриб» с числом «к».к натуральное число. Если не так тема то прошу изменить название |
lapp
Для числа «к» вывести на экран дисплея разу «мы н… 30.01.2006 10:33
Atos ещё добавить:
if k div 10 = 1 then s:='ов… 30.01.2006 12:42
lapp
ещё добавить:
Точно! Спасибо, Атос :)
За мно… 30.01.2006 15:36
malou Парни огромное спасибо! а как mod рисуется на … 30.01.2006 21:59
klem4 так и пиши ... mod 30.01.2006 22:07
Ostin как обыкновеная арифмитическая операция
не знаю к… 31.01.2006 0:27
klem4 думаю можно вот так :
a % b 31.01.2006 0:35
malou program V;
var
k:byte;
begin
writeln('Bbedute … 31.01.2006 0:55
volvo :blink:
Как остаток от деления на 10 может быть … 31.01.2006 1:11
malou
:blink:
Как остаток от деления на 10 может быть … 31.01.2006 1:11
malou program v;
var
k : byte;
s : string;
begin
writeln… 31.01.2006 1:24
klem4 uses crt;
var
k : word;
begin
for k := 1 to… 31.01.2006 1:31
volvo malou, вот объясни мне, ты ВООБЩЕ смотришь на то, … 31.01.2006 1:34
klem4 Задача решена аж 2-мя способами.
Обсуждать тут бол… 31.01.2006 1:37![]() ![]() |
|
Текстовая версия | 22.02.2026 5:15 |