Вопрос по информатике:
Работа в паскале.
Даны три переменные: x, y, z. Если их значения делятся без остатка на 4, то удвоить их; в противном случае заменить значение переменной на противоположное.
- 11.07.2018 07:36
- Информатика
- remove_red_eye 1674
- thumb_up 33
Ответы и объяснения 1
Var x,y,z:integer;
begin
write('Введите x, y, z: ');
readln(x,y,z);
if (x mod 4=0) and (y mod 4=0) and (z mod 4=0) then
begin
x:=x*2;
y:=y*2;
z:=z*2
end
else
begin
x:=-x;
y:=-y;
z:=-z
end;
writeln(x,' ',y,' ',z)
end.
- 12.07.2018 01:35
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.