Задать вопрос
18 августа, 15:22

Составить 2 программы циклами Repeat и While

Первоначальные размеры треугольника равны 5,7,9 см. Получая новые треугольники, стороны увеличиваются на 2,1,1 см. Какой по счету треуголь. будет иметь периметр превышающий величину 100?

+4
Ответы (1)
  1. 18 августа, 16:16
    0
    Var a, b, c, n: Integer;

    begin a : = 5; b : = 7; c : = 9; n : = 1; repeat a : = a + 2; b : = b + 1; c : = c + 1; n : = n + 1; until a + b + c > = 100; WriteLn (n) ; end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Составить 2 программы циклами Repeat и While Первоначальные размеры треугольника равны 5,7,9 см. Получая новые треугольники, стороны ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Определить значение переменной у после выполнения следующих фрагментов программы: a) Var у : real; i : integer; у : = 1; i : = 5; while i> 2 do i: = i - 1; y:=y + 1 * i; b) Var у : real; i : integer; у : = 1; i : = 2; repeat i: = 2 * i;
Ответы (1)
1) Какие операторы используются для организации циклов? a) while условие until; b) repeat until условие; c) while условие do; d) repeat do условие.
Ответы (1)
Имеется четыре произвольных числа a, b, c, d, которые вводятся с клавиатуры. Программа должна давать ответ на вопрос: "Правда ли что первое число меньше остальных" c циклами while repeat
Ответы (1)
Какие программы относятся к прикладным программам? A. Программы общего назначения. B. Специальные профессиональные программы. C. Языки программирования. D. Сервисные программы. E. Операционные системы.
Ответы (1)
1) Сколько раз выполниться цикл: a) For i:=7 downto - 3 do k:=k+1; b) k:=0; while k < 15 do begin k:=k+4; end; c) k:=10; repeat k:=k-1; until k>2; 2) Определите, что будет напечатано в результате работы следующего фрагмента программы: a) s:=0;
Ответы (1)