program str999; uses crt; var s: string; begin writeln(‘введіте фразу’); read(s); if (s=’край озер’) then writeln (‘край озер лесов и рек’); if (s=’я учусь в школе’) then writeln (‘я учусь в 10-м классе’) end.
потхоньку буду дополнять, не так все быстро))
program р_1; uses crt; var s: string; begin writeln(‘введите фразу’); read(s); if (s=’моя родина беларусь’) then writeln (‘беларусь моя родина’); if (s=’люблю цябе мой родны кут’) then writeln (‘мой родны кут люблю цябе’) end.
Ответ разместил: Гость
a в квадрате плюс b в квадрате:
Источник: evoprotvet.com
Преобразуй алгоритм в программу на языке Паскаль.
алг пример
нач цел x, y
y:=0
нц для x от 1 до 9
y:=y*2+3
кц
вывод y
кон
Втечении месяца продавец доставляла дом 4 л молока в день. в марте молоко стоило х руб за литр с первого апреля цена молока увеличилась до [x+a] руб за литр сколько надо заплатить продавцу за все доставленное молоко в конце апреля? кол-во покупаемого молока осталось прежним. решить в питоне
Информатика. Язык Pascal: Структура программы на языке Pascal. Центр онлайн-обучения «Фоксфорд»
Информатика, 20.04.2019 20:45
Сканируется цветное изображение размером 33,02×33,02 см. разрешающая сканера — 600×1200 dpi, глубина цвета — 24 бита. какой информационный объём будет иметь полученный графический файл?
Информатика, 21.04.2019 17:58
Много . сканируется цветное изображение размером 33,02×33,02 см. разрешающая сканера — 600×1200 dpi, глубина цвета — 24 бита. какой информационный объём будет иметь полученный графический файл?
Информатика, 06.05.2019 14:18
Вывести строку, которая встречается более 1-го раза в файле pascal.
Информатика, 13.05.2019 12:35
Подготовить презентацию на тему «форматы звука». позжалуйста!
Информатика, 15.05.2019 18:22
1. с оператора цикла по параметру определить сумму натурального ряда чисел от m до n (m, n-.ввести с клавиатуры). 2. с оператора цикла с предусловием найти сумму нечетных чисел натурального ряда от 1 до 11 . 3. с оператора цикла с постусловием найти произведение четных чисел натурального ряда от 2 до 10
Информатика, 16.05.2019 11:19
Дана a(10*10). найти сумму элементов пятой строки.
Математические выражения их запись в Паскале
Информатика, 16.05.2019 21:52
Нужно сделать с сайт в блокноте, с 4 страницами, чтобы были переходы с гипер ссылками, и чтоб на каждой страничке была таблица на любую тематику! выручайте !
Источник: otvetovik.com
Свежие вопросы
- Алгебра
- Астрономия
- Математика
- Русский язык
- Українська мова
- Информатика
- Геометрия
- Химия
- Физика
- Экономика
- Право
- Английский язык
- География
- Биология
- Другие предметы
- Обществознание
- История
- Литература
- Українська література
- Беларуская мова
- Қазақ тiлi
Показать ещё
Источник: uchebushka.ru