Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 21.10.2013
Сообщений: 2
1

При вводе числа в диапазоне от 0 до 50 программа должна выдать сообщение о количестве слоников(с правильным окончанием)

21.10.2013, 19:20. Показов 984. Ответов 2
Метки нет (Все метки)

Составить программу "считывающую" слоников. При вводе числа в диапазоне от 0 до 50 программа должна выдать сообщение о количестве слоников(с правильным окончанием)
0-ни одного слоника
1-1 слоник
2-2 слоника

.................
10-10 слоников и т.д.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.10.2013, 19:20
Ответы с готовыми решениями:

Программа запросит у пользователя его возраст и должна вывести "вам столько-то лет" с правильным окончанием
Программа запросит у пользователя его возраст и должна вывести "вам столько-то лет" с правильным...

Пользователь вводит 10 чисел программа должна выдать 2 максимальных(берём от 1 до 10,если выпадает 2 10,то программа должна выдать 2 10,а не 10,9)
#include <iostream> using namespace std; int main () { int number, largest_1, largest_2,...

Составить программу отыскивающую в двухмерном числовом массиве A(N,M) минимальное из чисел, если такого числа нет программа должна выдать сообщение
Составить программу отыскивающую в двухмерном числовом массиве A(N,M) минимальное из чисел, если...

Программа должна сгенерировать 2 случайных числа в диапазоне от 2 до 9
Здравствуйте! я только начинаю изучать азы Си подскажите пожалуйста! Задача такая: программа...

2
3450 / 2388 / 2135
Регистрация: 04.12.2011
Сообщений: 3,965
22.10.2013, 04:14 2
Лучший ответ Сообщение было отмечено Rayngard как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
  k: integer;
begin
  repeat
    write('Ââåäèòå ÷èñëî îò 0 äî 50: ');
    readln(k);
  until k in [0..50];
  write(k,' ');
  if k=0 then write('íè îäíîãî ñëîíèêà') else
    if k in [11..14] then writeln('ñëîíèêîâ') else
    case k mod 10 of
      1   : writeln('ñëîíèê');
      2..4: writeln('ñëîíèêà');
      else  writeln('ñëîíèêîâ');
    end;
  readln;
end.
0
0 / 0 / 0
Регистрация: 21.10.2013
Сообщений: 2
22.10.2013, 14:20  [ТС] 3
Спасибо большое!!!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.10.2013, 14:20

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Выдать сообщение при вводе точки в TextBox
Подскажите пожалуйста. как написать код , чтобы при написание точки в TextBox1 выдавалось...

Почему при вводе числа программа работает нормально, а при вводе буквы уходит в бесконечный цикл?
void mainmenu() { cout << "Введи число" << endl; cin >> choice; if (choice == 1) { cout <<...

При вводе числа в строке и нажатии ENTER выдать значение YES
Добрый вечер! Мне на завтра задали написать задачу на Паскале. Помогите решить, пожалуйста! ...

При вводе цифр и букв вместе, программа должна выдавать ошибку
Проблема в следующем... Мне нужно, чтобы программа выдавала ошибку, если я введу что-то подобное...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.