Пользователь вводит трёхзначные числа с клавиатуры. нужно вывести числа в записи которых все 3 цифры чётные. на языке pascal. с написанием программного кода

264

470

Посмотреть ответы 2

Ответы на вопрос:

3344227p06s57

Информатика

4,6(75 оценок)

Uses crt; var a: array[1..100] of integer; b,k,l,i,n: integer; begin writeln('skolko chesel vy bydete vvodit? '); read(n); for i: =1 to n do begin write('vvedite ',i,' chislo: '); read(a[i]); end; for i: =1 to n do begin b: =a[i] div 100; k: =a[i] div 10 mod 10; l: =a[i] mod 10; if (b mod 2 = 0) and (k mod 2 = 0 ) and (l mod 2 = 0) then writeln(a[i]); end; end.

Пензик

Информатика

4,8(82 оценок)

a - так, так как в алгоритме пишется все максимально просто. Правда если человек достаточно умен)

б - так, если имеется в виду бесконечное исполнение так как может быть цикл с логическим True, к примеру в других условиях цикла или определенное расстояние либо условие если условие истинно, то это тоже самое что и в то время в цикле было бы написано логическое True

с - так, если за результат имеется в виду конец алгоритма

д - нет, алгоритм может быть таким:

Начало-->Ввод 'Привет'-->Конец

спрашивай если что-то не понятно