В начале в строке находилось 333 троек по 8 плюс одна 8, всего 1000 восьмерок. 1. При выполнения цикла каждая из троек 8 будет заменена на одну 9. Значит у нас получится строка длиной в 334 символа, где 333 девятки и последний символ - восьмерка 2. Далее 333 девятки заменятся на 111 восьмерок плюс последняя восьмерка - всего получим 112 восьмерок 3. Из 112 восьмерок получится 37 девяток и одна восьмерка 4. И 37 девяток получим 12 восьмерок плюс одна девятка и плюс последняя восьмерка 5. 12 восьмерок дадут 4 девятки плюс последние 9 и 8 6. И наконец получаем строку 8998 ответ: 8998
{ s(трапеции) = ((a+b)/2)*h; } uses crt; var a, b, h: Integer; (Real) s: Real; begin WriteLn('Введите а: ',a);ReadLn(a); WriteLn('Введите b: ',b);ReadLn(b); WriteLn('Введите h: ',h);ReadLn(h); s:= ((a+b)/2)*h; WriteLn('S = ', s); ReadLn; end. Если же а и б должны быть обязательно меньше h, то: if (a < h) and (b < h) then begin WriteLn('Введите а: ',a);ReadLn(a); WriteLn('Введите b: ',b);ReadLn(b); WriteLn('Введите h: ',h);ReadLn(h); s:= ((a+b)/2)*h; WriteLn('S = ', s); ReadLn; end; else begin WriteLn('Основания не меньше h!'); ReadLn; end;
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку