Есть ответ 👍

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

265
482
Посмотреть ответы 2

Ответы на вопрос:


  для pascal

 

program utroennoe;

var i: longint;

begin

read(i);

writeln(i*3);

end.

 


const n=10;

var a: array[1..n] of integer;

i: integer;

begin

write(' исходный массив: ');

for i: =1 to n do

begin

a[i]: =random(9)+1;

write (a[i]: 4,' ')

end;

writeln;

write('преобразованый массив: ');

for i: =1 to n do

begin

if (a[i] = 5) then a[i]: =1000;

write (a[i]: 4,' ')

end

end.

Популярно: Информатика