Ответы на вопрос:
Var a,b: integer; begin write('введите два числа: '); readln(a,b); a: =a+b; if a mod 5 = 0 then a: =a+1 else a: =a-2; writeln(a); end. введите два числа: 17 13 31
1. намалювати круг. 2.визначити радіус. 3.визначити радіус в інший бік. 4. поділити круг на чотири рівні частини. 5.намалювати в кожній частині по одному кружечку. 6.стерти лінії 7.замалювати.
Популярно: Информатика
-
Варёна10.12.2021 21:23
-
vanya16503.02.2020 07:39
-
2Velial104.03.2023 02:27
-
Tanya546331.08.2020 11:08
-
Алима2004103.05.2020 10:50
-
Besta6906.10.2020 11:17
-
neznayka190031.03.2020 16:56
-
mschibarova20122.10.2022 08:19
-
Maksi11229.03.2020 12:46
-
Zeus4114.04.2023 21:21