Есть ответ 👍

НАЧАЛО
ПОКА нашлось (222) ИЛИ нашлось (888)
ЕСЛИ нашлось (222)
ТО заменить (222, 8)
ИНАЧЕ заменить (888, 2)
КОНЕЦ ЕСЛИ
КОНЕЦ ПОКА
КОНЕЦ
Какая строка получится в результате применения приведённой ниже программы к строке,
состоящей из 72 идущих подряд цифр 8? В ответе запишите полученную строку.​

148
359
Посмотреть ответы 1

Ответы на вопрос:

lara1906
4,6(63 оценок)

1) var a, b, l: real; begin write('введите a, b> > '); read(a, b); l: =(a+b)/2; writeln(l); end.2)var a, b: integer; beginwrite('введите 2 числа> > '); read(a, b); if a< b then writeln(a) else writeln(b); end.3)var a1, d, n, sr: real; beginwrite('введите a1, d> > '); read(a1, d); n: =15; sr: =a1+d*(n-1); writeln(sr); end.4)vara, d, p: real; i: byte; beginwrite('введите первую сторону> > '); read(a); for i: =1 to 8 dobeginp: =p+a; a: =a+2; end; writeln('p = ', p); end.

Популярно: Информатика