• 16 April 2017
    • Українська література
    • Автор: Alinarustam1

    Помогите с задачами
    1) введите с клавиатуры 3 числа если они больше 10 то выводим слово успех иначе провал
    2) генерируйте число от 10 до 99 если оно четное и больше 75 то вывести на экран сумму его чисел иначе разность

    • Ответ оставил: Мненужнпомошь
    Решение на скринах. Копировать не хочу, т.к все в строчку получается
    • Ответ оставил: Мненужнпомошь
    Var   a,b,c:real;BeginWrite('Введите три числа: ');ReadLn(a,b,c);if (a>10)and(b>10)and(c>10) then WriteLn('успех')else WriteLn('провал');End.Var   A:integer;BeginRando...
    • НЕ НАШЛИ ОТВЕТ?
    Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предметы...

Последние опубликованные вопросы