Составить программу, которая определяет, чётно или нечётно количество символов в слове
Программа на языке Паскаль
program pr;
s: string;
begin
readln (s);
if length(s) mod 2=0 then writeln ('Четное') else writeln('Не четное');
readln;
end.
Program xxx;
s : string;
a : integer;
Begin
writeln('Введите строку символов:'
a:= length(s);
if a mod 2= 0 then writeln ('Четное') else writeln('Не четное');
В какой оболочке земли живёт большинство живых организмов?
Из каких неживых частей состоит экосистема
На какие расы делятся население земли
Определение статуса военнослужащего (краткий ответ!!)
Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.