10. Сколько раз будет выполнен цикл?
а) for i:=0 to 15 dо ѕ:=s+1;
б) for i:=10 to 15 dо ѕ:=s+1;
B) for i:=-1 to 1 do s:=s+1;
г) for i:=10 to 10 dо ѕ:=s+1;
д) k:=5;
for i:=k-1 to k+1 dо ѕ:=s+1;
РАЗВЕРНУТОЕ РЕШЕНИЕ!!!!!
291
482
Ответы на вопрос:
1) var a,b,c: real; begin writeln('введите значения углов в градусах: '); write('a = '); readln(a); write('b = '); readln(b); write('c = '); readln(c); if a+b+c=180 then begin writeln('существует'); if (a = 90)or(b = 90)or(c = 90) then write('является прямоугольным') else write('не является прямоугольным') end else writeln('не существует') end. 2) var n: integer; begin write('n = '); readln(n); writeln('количество чисел, кратных четырём на отрезке [1,',n,']: ',n div 4); end.
Популярно: Информатика
-
юлия2004311.07.2022 10:46
-
amino4ka29080501.01.2021 09:13
-
Your0ppa19.09.2022 21:27
-
DestroyMe12.10.2020 03:58
-
Ivangggg25.03.2022 21:31
-
Варя20070618.07.2020 00:58
-
GAGHHy02.12.2021 23:03
-
АлинаПетрищева22.06.2023 11:35
-
Mariapolitova06.11.2022 08:11
-
соннышко19.01.2020 01:20