Блог для маленьких школьников и их родителей
ШколаЛа

Помогите составить программы (хотя бы 1)

Автор:
Предмет: Информатика
Уровень: 5 - 9 класс

Помогите составить программы (хотя бы 1)

Ответов к вопросу: 1
  • ktrnmnlk
    16.09.2024 | 09:58

    Pascal ABC.Net
    1)
    begin

     var (x, y, z) := ReadInteger3(‘Введите 3 числа через пробел: ‘);

     Println(if (x + y + z) mod x = 0 then ‘Делится без остатка’ else ‘С остатком’);

    end.

    2)
    begin

     Println(‘Среднее арифметическое: ‘, Range(10, 99, 1).Where(x -> x mod 2 = 0).Average);

    end.

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.