
Вопрос задан 19.12.2018 в 09:54.
Предмет Информатика.
Спрашивает Колпаков Дима.
Помогите пожалуйста решить задачи срочно!!1)Написать программу, которая последовательно спрашивает
у пользователя вопросы«Знает ли он Кумир?», «Знает ли он Бейсик?», «Знает ли он Паскаль?», «Знает ли он Си?». Ответыпринимаются в логические переменные. По результатам ответов делается вывод о перспективахсдачи экзамена. Отметка «Отлично» соответствует знанию всех языков, при отметке «Хорошо»допускается пробел в незнании одного языка, отметка «Удовлетворительно» дается при знаниихотя бы двух языков. Использовать логические операции вместо ветвления.2)Запросить у пользователя произвольное целое число и посчитать количество цифр внем. Результат вывести. Предусмотреть вариант с десятичной записью дробного числа.3)Написать программу, которая хранить в памяти расположение шахматных фигур.Произвольная конфигурация (без пешек) задается компьютером. Пользователь пытаетсяугадать, где находится заданная фигура при 5 попытках. Вывести результат в случае удачи неудачи.4)Написать программу, которая заполняет массив случайными числами в интервале[10,200] и подсчитать отдельно число чётных и нечётных элементов.5)Дано предложение ОпределитьА) количество слов начинающихся с буквы nБ)количество слов заканчивающихся буквой р6)Даны вещественные числа b1 b2 ...b9 Определить среднее арифметическое тех которые больше 107)Даны натуральное число m и целые числа х1 х2 ,,,хm Определить сумму тех которые кратны числу n кто сможет решить все это - кину 200 р на телефон!!! Обещаю!, кидайте на стену номер тел. или в личку!тоолько решите!!!!Решить в КУМИРЕ:

Ответы на вопрос

Отвечает Осадчая Виолетта.
См решение задач в Кумире....



Отвечает Конин Илья.
Если я правильно понял, то так (1-5 в файлах)
6:
алг
нач
цел таб b[1:9]
цел к
вещ а, б
а := 0
б := 0
нц для к от 1 до 9
ввод b[к]
если (b[к] > 10) то
а := а + b[к]
б := б + 1
все
кц
вывод а / б
кон
7:
алг
нач
цел м, н
ввод м, н
цел таб b[1:м]
цел к, а
а := 0
нц для к от 1 до м
ввод b[к]
если (mod(b[к], н) = 0) то
а := а + b[к]
все
кц
вывод а
кон
6:
алг
нач
цел таб b[1:9]
цел к
вещ а, б
а := 0
б := 0
нц для к от 1 до 9
ввод b[к]
если (b[к] > 10) то
а := а + b[к]
б := б + 1
все
кц
вывод а / б
кон
7:
алг
нач
цел м, н
ввод м, н
цел таб b[1:м]
цел к, а
а := 0
нц для к от 1 до м
ввод b[к]
если (mod(b[к], н) = 0) то
а := а + b[к]
все
кц
вывод а
кон


Топ вопросов за вчера в категории Информатика

Информатика 47

Информатика 33

Информатика 67

Информатика 18

Информатика 25

Информатика 563

Информатика 16
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili