Определить, попадет ли точка М(х,у) с координатами, заданными с клавиатуры, в закрашенную фигуру. програма в паскале
272
480
Ответы на вопрос:
begin
var a: =readinteger;
var b: =readinteger;
var min: =0.0;
for var i: =a to b do
begin
min+=0.5;
end;
if odd(a) and not odd(b) then
write(min-1);
if not odd(a) and odd(b) then
write(min);
if (not odd(a) and not odd(b)) or (odd(a) and odd(b)) then
write(min-0.5);
end.
вроде так, но не уверен!
Популярно: Информатика
-
Katyakat2005090402.03.2021 14:22
-
MasterGameTV119.09.2022 20:46
-
ImperialDragonYT02.04.2021 21:23
-
Vikof02.01.2020 00:54
-
egorjanov220022.01.2020 02:41
-
Ясте30.07.2020 20:19
-
ArturGafiyatullin14526.02.2020 19:05
-
941645122.05.2023 21:27
-
maliiii0208.02.2021 06:04
-
диля1234567асем19.11.2020 23:20