ЯЗЫК ПАСКАЛЬ ПАША И КУБИКИ У маленького Паши было 5 кубиков с цифрами от 1 до 5 на каждом кубике. В - id1626671620211231 от АнгелТих 31.12.2021 07:11

Question

Информатика: ЯЗЫК ПАСКАЛЬ ПАША И КУБИКИ У маленького Паши было 5 кубиков с цифрами от 1 до 5 на каждом кубике. В не самый прекрасный день Паша обнаружил, что один из кубиков потерялся. Паше понять, кубик с какой цифрой потерян, зная цифры на оставшихся кубиках. Формат входных данных: Программе на вход подаются 4 числа-цифры на оставшихся кубиках. Формат выходных данных: Программа должна вывести одно число -цифру на кубике, который потерялся.​

АнгелТих · Accepted Answer

var    a: integer;begin    {1}    readln(a);    if a 0 then a := a + 1;    writeln(a);        {2}    readln(a);    if a 0 then a := a * 2;    writeln(a);        {3}    readln(a);    if a 0 then a := a - 4;    writeln(a);        {4}    readln(a);    if a 0 then a := a + 1    else a := a - 1;    writeln(a);        {5}    readln(a);    if a = 0 then a := a + 3    else a := 0;    writeln(a);end.{6}var    x, y: real;begin    readln(x, y);    if x y then x := x * y    else x := x + y;    writeln(x);end....

MOGZ ответил