PASCAL ABC
program z1;
var a,s:integer; //описание переменных
begin
readln(a); //вводим первое число
s:=0; //начальное значение суммы
while a<>0 do //условие ввода (ввод оканчивается нулем)
begin
if (a mod 10=4) and (a mod 6=0) then s:=s+a; //проверка двух условий: первая скобка - оканчивается на 5, вторая - кратно 6
readln(a) //заново вводим число
end;
writeln(s) //вывод суммы, когда весь цикл завершится
end.
P.S не особо понимаю, почему с таким вводом, такой ответ у тебя получается
=ЕСЛИ(A5="Информатика";"Современная наука";"Пароль не верен")
Объяснение:
Открываем ноутбук
Включаем ноутбук
Ждём загрузки операционной системы (скорее всего Windows)
Запускаем программу для работы с таблицами (скорее всего Excel)
На открывшемся листе выбираем ячейку B5 и вводим туда формулу =ЕСЛИ(A5="Информатика";"Современная наука";"Пароль не верен") и нажимаем Enter
В ячейке B5 сразу отображается надпись: Пароль не верен
Выбираем ячейку A5 вводим произвольный пароль и нажимаем Enter, надпись в ячейке B5 не меняется
Выбираем ячейку A5 вводим Информатика и нажимаем Enter, в ячейке B5 отображается надпись: Современная наука
Если текст не виден целиком, то выделяем ячейки A5 и B5 в меню ГЛАВНАЯ находим Формат (нажимаем на него) и выбираем Автоподбор ширины столбца (нажимаем на него)
Ширина столбцов подбирается по размеру слов них
Смотри картинки
ответ: 2)
Я написал решение на листочке ===>>