Program Primer, var a, s: integer, begin S:= 0; readln(a); while a<>0 do begin if (a mod 4 = 0) and (a mod 10 = 4) then S:= S +a; readln(a); end; writeln(s); end. Какое число получится, если ввести ряд чисел 80, 12, 164, 104, 11,0? (помогите пожалуйста)

Вопрос:

Program Primer,
var a, s: integer,
begin
S:= 0;
readln(a);
while a<>0 do begin
if (a mod 4 = 0) and (a mod 10 = 4)
then
S:= S +a;
readln(a);
end;
writeln(s);
end.
Какое число получится, если
ввести ряд чисел 80, 12, 164, 104,
11,0? (помогите пожалуйста)

Информатика

admin 19.05.2023 110

Ответ учителя:

Ответ:

здравствуйте. ответ 268

Другие вопросы

Создать вопрос

Похожие вопросы:

# 1 Помогите пожалуйста с программой! Делала презентацию в Powerpoint и куда то нажала, что исчезла вверху все действия с презентации. Остался только слайд чуть ли ни на весь экран и появляются Показ слайдов, Главная и тд только по щелчку. Как это исправить?

# 2 не получается сделать программу в ABCпаскаль, в чем ошибка? uses crt; var a: array [1..20] of index; begin for i:= 1 to 15 do; readln(a[i]); for i:= 1 to 15 do; writeln(a[i]); for i:= 1 to 15 do; if a[i] mod 2 = 0 then S:=S+1; S:= S+a[i]; writeln(S); end.

# 3 Program Primer, var a, s: integer, begin S:= 0; readln(a); while a<>0 do begin if (a mod 4 = 0) and (a mod 10 = 4) then S:= S +a; readln(a); end; writeln(s); end. Какое число получится, если ввести ряд чисел 80, 12, 164, 104, 11,0? (помогите пожалуйста)

# 4 информатика, язык программирования питон. напишите программу, которая спрашивает возраст человека и, если ему 18 лет и больше, сообщает “Замечательно. Вы уже можете водить автомобиль”, а в противном случае – “К сожалению, водить автомобиль Вам рановато”

# 5 Срочно, решите, пожалуйста!!! Иван составляет пяти-буквенные слова из букв:и, в, а, н. Буквы в слове могут повторяться, использовать все буквы не обязательно, но букву «и» нужно Использовать хотя бы один раз. Сколько различных слов может составить Иван?