Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
EsMiLe1999
14.06.2020 06:48 •
Информатика
Написать в паскале программу : ввести возраст человека (от 1 до 150 лет) и вывести его вместе с предыдущим словам "год","года" или "лет".
Показать ответ
Ответ:
nikaaleksievich
04.10.2020 02:19
Var
n,b: integer;
begin
writeln ('vvel n');
read (n);
b:= n mod 10;
if b=1 then writeln (n,'god');
if (b>1) and (b<5) then writeln (n,'goda')
else
writeln (n,'let');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Albinnabel
05.06.2021 15:24
Назовите формы представления графической информации а)Аналоговая и дискретная б) векторная и аналоговаяв) дискретная и викторная...
pishinaangelina
23.09.2020 07:17
Очень Используя таблицу символов, записать последовательность десятичныхчисловых кодов в кодировке Windows для своих ФИО и названия улицы, покоторой проживаете.Хуснуллина...
wionk
24.01.2021 07:28
В конструкторе алгоритмов используя цикл с предусловием, составить блок-схему для решения задачи. 10. Подсчитать кол-во трехзначных чисел, кратных 5 блок схему сделать...
Yatoi
30.04.2022 22:13
решить задачу на Паскале Дано N действительных случайных чисел в диапазоне от 1 до 10. Все элементы последовательности, значение которых меньше двух, заменить на ноль,...
0508761681
17.09.2021 18:03
Как сделать такую диаграмму в эксель?...
lolipop310
17.12.2021 20:43
решить задачи по информатике Задача 1. Какое количество информации получит слушатель из сообщения о 512 равновероятных событий? Задача 2. Определите количество символов...
СоняДемидова1
10.05.2020 13:40
У чому полягає відмінність запитів і фільтрів?...
katy1231231233
01.03.2020 23:46
На полочке в красивой вазочке лежит 1100 12 леденцов, 11 8 шоколадных конфет, 19 16 карамелек. Какое количество сладостей лежит в вазочке? ответ дай в десятичной системе...
Lool199865
05.02.2021 00:28
1. Для чего используются диаграммы в MS Excel? 2. На какой вкладке MS Excel находится команда для добавления диаграммы?3. Определите вид диаграммы...
Dasha826251
19.10.2021 15:06
Напишите код программы, которая позволит вывести на экран ваше собственное имя 100 раз...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n,b: integer;
begin
writeln ('vvel n');
read (n);
b:= n mod 10;
if b=1 then writeln (n,'god');
if (b>1) and (b<5) then writeln (n,'goda')
else
writeln (n,'let');
end.