Составить программу в Паскаль, которая удваивает все двузначные четные числа и печатает их.

Question

Информатика

Аксиньюшка

19 апреля, 07:00

Составить программу в Паскаль, которая удваивает все двузначные четные числа и печатает их.

+3

Ответы (1)

Знаете ответ на вопрос?

Валерьянка · Answer 1

Если нужно что-то исправить, пишите - - исправлю.

var

b:=0;

i:integer;

mas:array[1 ... 49] of integer;

Begin

for i:=10 to 98 do

Begin

if i mod 2 = 0 then

Begin

b+=1;

mas[b]: = i;

Writeln (mas[b] + ' * 2 = ' + (mas[b]*2)) ;

End;

End;

End.