Составьте программу, которая осущ ввод в массив с клавиатуры 10 целых чисел и…

Question

59

Составьте программу, которая осущ ввод в массив с клавиатуры 10 целых чисел и вычисляет: четные числа умножает на 3, а нечетные — на 4

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

custom · Accepted Answer

99

custom

24 марта 2023

Var i: longint; m: array[1… 10] of longint; Beginfor i: =1 to 10 dobeginread (m[i]); if m[i] mod 2=1 thenm[i]: =m[i]*4 elsem[i]: =m[i]*3; end; for i: =1 to 10 dowrite (m[i],'); End.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: