Контроль учащихся, распределение уроков
Потому что без паузы алфавит морзе невозможно читать например ••• •••••• •• •••• ••• иииии посмотрите это без паузы ••••••••••••• ну ка? смогли почитать ? пауза нужен на то чтобы слово можно было читать по буквам
На паскале:
var a:integer;
begin
writeln('Введите целое положительное число');
read(a);
if a mod 2 = 0 then writeln('Число чётное')
else writeln('Число нечётное');
end.
1. Примером чисел, которые принадлежат данной области и ошибочно не учитываются данной программой являются числа в 3й четверти выше y=x, например, (-0.5, -0.1), а также в 1-й четверти, например, (1, 1)
2. Программа на Паскале прилагается.
Program Proverka;
var a, b, c, k:integer;
begin
k:=0;
read(a);
for c:= 1 to a do
begin
read(b);
if(b > 0) then
begin
k:=k+1;
end;
end;
if(k mod 3 = 0) then
begin
write('YES');
end
else
begin
write('NO');
end;
end.