Информатика, опубликовано 06.06.2020 11:23
Написать программу на Паскале
Условие задачи Даны три числа, если они все четные найти их средне арифметическое, если они все нечетные
найти их сумму и произведение.
Ответы
Ответ оставил: Гость
// PascalABC.NET
begin
var (a, b, c) := ReadInteger3('Введи три числа:');
if a.IsOdd and b.IsOdd and c.IsOdd then
Print(a + b + c, a * b * c)
else if a.IsEven and b.IsEven and c.IsEven then
Print((a + b + c) / 3)
end.
Ответ оставил: Гость
Емли теле 2,то подключай тариф "крутой"))Ответ оставил: Гость
ТекстомC:.
│
├───Документы
│ └───Компьютеры
│ Принтер.gif
│
├───Мои документы
│ └───Учебные
│ Доклад.doc
│ Реферат.doc
│
└───Рисунки
├───Города
│ Благовещенск.bmp
│
└───Природа
Бор.jpg
Графикой внизу
Ответ оставил: Гость
По запросу А)Составьте программу, которая заполняет массив В[1..11] случайными целыми числами в диапазоне от -5 до 5 и преобразовывает его, заменяя элементы ... ничего не найдено. Рекомендации:
Убедитесь, что все слова написаны без ошибок.
Попробуйте использовать другие ключевые слова.
Попробуйте использовать более популярные ключевые слова.
Попробуйте уменьшить количество слов в запросе.
Другие вопросы по информатике
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
