Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
компьютер входит в состав бытовой техники.
компьютер является надсистемой для компьтерных программ.
var
i: integer;
a: array[1..20] of integer;
function fn(x: integer): integer;
begin
if x mod 10 = 4 then fn: =x div 2
else fn: =x;
end;
for i: =1 to 20 do
readln(a[i]);
a[i]: =fn(a[i]);
writeln(a[i]);
end.
файл с исходным текстом программы на паскале должен иметь расширение pas.
мне кажется в цифровом виде
Популярные вопросы