===== PascalABC.NET =====
begin
var R := ReadReal('Введите радиус цилиндра:');
var h := ReadReal('Введите высоту цилиндра:');
var S := 2 * Pi * R * h;
Writeln('Площадь боковой поверхности цилиндра ', S:0:5)
end.
В приложении примеры стандартного решения для этой задачи.
Вот еще вариант в Excel
Изменяя значения вверху таблицы истинности можно проследить работу схемы.
Лист защищен без пароля, чтобы случайно не повредить формулы.
Снимаете пароль, копируете логические элементы, получаете модель схемы.
На других листах приведены некоторые основные формулы, позволяющие упростить логическое выражение.
Удачи!
Прялка: 3 последние отбрасываем, вместо Я - О: ПРО
Гиря в 1 грамм: ГРАММ
Аист - отбрасываем 1-ю букву: ИСТ.
Итого: ПРОГРАММИСТ.
Первое задание можно перефразировать (число меньше 50) или (число четное)
Проверяем 1) 123<50? НЕТ 123 - четное ? НЕТ Итог: НЕТ
2) 56 < 50 НЕТ 56 - четное? ДА Итог: ДА
3) 9 < 50 ? ДА (второе условие можно не проверять - Итог: ДА
4) 8<50 ? Да Итог: ДА
Ответ: 1)
Задание 2 Числа в клетках означают расстояния между пунктами. Берем во внимания только значения над диагональю. Всего таких шесть. Например, число 2 в первой строке на пересечении А и В это расстояние между пунктами А и В,где клетки пустые между этими пунктами нет дороги.
Кратчайшее расстояние между А и Е равно 5 условных единиц: АЕ=АВ+ВС+СЕ=2+1+2
Задание 3 Ответ 1)
Адрес электронной почты обычно состоит из двух частей: имя@сервер. Часть, расположенную до @ выбирает пользователь, это имя пользователя. Часть после @ – это адрес сервера.
В [email protected] имя владельца – user_name