Предмет: Информатика,
автор: pivovarov94
Какое значение примет К после выполения алгоритма
Х:=0:K:=5
выбор
при x<5:K:=3
при x<=0:K:=2
иначе K:=0
все Пожайлуста напишите программу.Мы сейчас проходим оператор case!
Ответы
Автор ответа:
0
Program Number1;
Var
x, k: integer;
Begin
writeln(‘Введите x‘);
readln(x);
if (x<0) or (x>9)
then
writeln (‘Это число не является цифрой‘)
else
case x of
1,2,3,4 : k:=3;
else:
if (x<=0)
then
k:=2;
else
k:=0;
end;
readln;
End.
Var
x, k: integer;
Begin
writeln(‘Введите x‘);
readln(x);
if (x<0) or (x>9)
then
writeln (‘Это число не является цифрой‘)
else
case x of
1,2,3,4 : k:=3;
else:
if (x<=0)
then
k:=2;
else
k:=0;
end;
readln;
End.
Автор ответа:
0
var
x, k: integer;
begin
x := 0;
k := 5;
case x of
1..4: k := 3;
0: k := 2;
else k := 0;
end;
writeln('k = ', k);
end.
x, k: integer;
begin
x := 0;
k := 5;
case x of
1..4: k := 3;
0: k := 2;
else k := 0;
end;
writeln('k = ', k);
end.
Похожие вопросы
Предмет: Русский язык,
автор: legendarysenyaa
Предмет: Биология,
автор: mabel250
Предмет: Математика,
автор: najdanovavaleria121
Предмет: Химия,
автор: sabi15