Информатика, опубликовано 2018-08-22 22:36:45 by Гость
Дан массив из 10 элементов. Определить 2х значные числа и которые заканчиваются на цифре 5.
Ответ оставил Гость
Var
i:integer;
b: array[1..10] of integer;
begin
for i:=1 to 10 do readln(b[i]);
writeln;
writeln(Двухзначные:);
for i:=1 to 10 do
if (b[i]>9) and (b[i] then write(b[i], );
writeln;
writeln(Оканчиваются на 5:);
for i:=1 to 10 do
if b[i]mod 10=5
then write(b[i], );
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на