Опубликовано 6 лет назад по предмету Информатика от ворона

1) Определить, является ли заданное целое число а двузначным числом. (Разветвляющийся алгоритм)

2) Вывести все нечетные однозначные числа. (Цикл)

3) Найти сумму нечетных элементов одномерного массива. (Массив)

все в паскале

Ответ

Ответ дан GlowWorm59

1)

program z1;

Var a:integer;

Begin read(a);

if (a>9) and (a<100) then writeln(a, '-двузначное число')

else writeln(a, '-не является двузначным числом');

end.

2)

program z2;

Var i:integer;

Begin

for i:=1 to 9 do if (i mod 2 = 1) then writeln(i, ', ');

end.

2 способ:

program z2;Var i:integer;Begini:=1;while i<=9 do begin write(i, ', '); i:=i+2; end;end.

3)

program z3;Var i,n:integer; S:real; a: array[1..100] of real;Beginwrite('Введите количество элементов массива:');readln(n);write('Введите элементы массива:');for i:=1 to n do read(a[i]);i:=1; S:=0;while i<=n do begin S:=S+a[i]; i:=i+2; end; write('S=',S);end.

Не тот ответ, который вам нужен?

Найди нужный

Самые новые вопросы

Другие предметы - 8 месяцев назад

В какой оболочке земли живёт большинство живых организмов?

Другие предметы - 8 месяцев назад

Из каких неживых частей состоит экосистема

Другие предметы - 8 месяцев назад

На какие расы делятся население земли

Другие предметы - 8 месяцев назад

Определение статуса военнослужащего (краткий ответ!!)

Другие предметы - 8 месяцев назад

Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?

Задай вопрос

Лучшие за месяц

1

Oksana Gordienko
+798, 2 награды
2

Bianca
+743, 4 награды
3

Monna
+702, 2 награды
4

Brawer
+646, 3 награды
5

Ольга М.А.
+10.5K, 4 награды
6

Kovaleva_08
+522, 1 награда
7

Serebro
+495, 3 награды
8

Laguna
+489, 2 награды
9

Katerina_kiev
+441, 3 награды
10

Мусиенко Денис
+402, 2 награды

Интересные статьи: