ТутРешу.Ру

ПОМОГИТЕ! ЗАДАЧА ПАСКАЛЬ!

Задание:

ПОМОГИТЕ! ЗАДАЧА ПАСКАЛЬ! ПРОШУ, ПРОСТО ВЫРАЖЕНИЯ НАПИШИТЕ, Я ТАМ САМА ОФОРМЛЮ

Решение:

1. var N, k: real; begin readln (N); if (N<0) then k: =0 else begin if (frac (N)=0) then k: =N*2 else k: =(trunc (N)+1)*2; end; writeln (k); end.2. Первый хулиган увеличивал количество кусочков на 3 Второй — на 6 То есть, всего кусочков должно быть N=1+3m+6n Значит, N — 1 должно делиться на 3 и наоборот, если N — 1 делится на 3 N — 1=3k то возможна ситуация, когда Первый хулиган рвал k раз, а Второй наблюдал (ничего не рвал). Алгоритм свелся к проверке: Если N -1 не делится на 3, то No КОНЕЦ




Знаете другой ответ?

Отправить свой ответ