Предмет: Информатика,
автор: ЮленькаСергеева
Помогите, пожалуйста) Нужно решить задачи и блоксхемы сделать на языке Паскаля, очень срочно
Приложения:
Ответы
Автор ответа:
0
1)program abc;
var i,n,s:integer;
beginread(n);
s:=1;
for i:=1 to n do
if i mod 2<>0 then s:=s*i ;
writeln(s);
end.
var i,n,s:integer;
beginread(n);
s:=1;
for i:=1 to n do
if i mod 2<>0 then s:=s*i ;
writeln(s);
end.
Интересные вопросы
Предмет: Литература,
автор: noy10
Предмет: Литература,
автор: Аноним
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: Cripers