Задание. Напиши программный код к задаче: Пользователь вводит число. Если введет число меньше нуля, то будет напечатано “отрицательное“ , равное нулю – “ ноль “, большее нуля – “ положительное“. 7 класс
1) Program NoName; Var i,m : integer; Begin read(m); if m>31 then begin for i:=31 to m do if (i mod 16) = 0 then writeln(i); end; end.
2)Program NoName; Var i,n,x,c : integer; Begin c:=1; x:=0; i:=0; while i<5 do begin if (c mod 13) = 0 then begin x:=x+c; i:=i+1; end; c:=c+1; end; write(x); end.
3)Program NoName; Var i,n,x,c : integer; Begin read(n); c:=1;x:=1;i:=0; while i<n do begin if (c mod 11) = 0 then begin x:=x*c; i:=i+1; end; c:=c+1; end; write(x); end.
4)Program NoName; Var i,m,x : integer; Begin x:=0;i:=1; while x<7 do begin if (i mod 7) = 0 then begin writeln(i);x:=x+1; end;i:=i+1; end; end.
Разбираешься в компьютерах и играх, но не разбираешься в программирование. Я могу сделать вывод, что ты играл на протяжении 6 лет в игры и собирал себе компьютер для игр
Думаю ты не разбираешься во внутренностях компьютера.
Экзамены перенесли на август, мои тебе советы:
Готовься к ЕГЭ
Смотри видео уроки по профильной математике ЕГЭ от Павла Маслова (Ютуб)
Физику смотри также на Ютубе (Пенкин)
Также могу тебе посоветовать решать каждый день по 15 вариаций заданий, которые ты например выучил решения первого задания матана, решай их как можно больше)
Var i,m : integer;
Begin
read(m);
if m>31 then begin
for i:=31 to m do
if (i mod 16) = 0 then writeln(i);
end;
end.
2)Program NoName;
Var i,n,x,c : integer;
Begin
c:=1;
x:=0;
i:=0;
while i<5 do begin
if (c mod 13) = 0 then
begin x:=x+c; i:=i+1;
end;
c:=c+1;
end;
write(x);
end.
3)Program NoName;
Var i,n,x,c : integer;
Begin
read(n);
c:=1;x:=1;i:=0;
while i<n do
begin
if (c mod 11) = 0 then
begin x:=x*c;
i:=i+1;
end;
c:=c+1;
end;
write(x);
end.
4)Program NoName;
Var i,m,x : integer;
Begin
x:=0;i:=1;
while x<7 do begin
if (i mod 7) = 0 then
begin
writeln(i);x:=x+1;
end;i:=i+1;
end;
end.
Разбираешься в компьютерах и играх, но не разбираешься в программирование. Я могу сделать вывод, что ты играл на протяжении 6 лет в игры и собирал себе компьютер для игр
Думаю ты не разбираешься во внутренностях компьютера.
Экзамены перенесли на август, мои тебе советы:
Готовься к ЕГЭ
Смотри видео уроки по профильной математике ЕГЭ от Павла Маслова (Ютуб)
Физику смотри также на Ютубе (Пенкин)
Также могу тебе посоветовать решать каждый день по 15 вариаций заданий, которые ты например выучил решения первого задания матана, решай их как можно больше)
Сдай ЕГЭ
Без него ничего не выйдет