Клавиша. ответ клавиша. Запятые если стоят до рисунка значит нужно убрать в начале столько букв сколько запятых. То есть ,,Кукла убираем первые 2 буквы получается "кла" за тем рисунок вишни после которого три запятые убираем последние 3 буквы получается "ви" дальше нарисованы шары убираем убираем последние 2 буквы и получается "ша" И вместе получается "Клавиша"
program xopow1; uses crt; var a, b, Sek: integer; begin writeln('Введите границы:'); repeat readln(a, b); until b >= a; clrscr; for a := a to b do begin Sek := a * 60; writeln(a, ' мин. = ', sek, ' сек.') end end.
2.
program xopow2; uses crt; Var z:integer; f,x,y:real; Begin clrscr; Writeln; X:=10000; Y:=(x/100)*10; for z:=1 to 7 do Begin X:=x+y; Writeln(Z,' -й день тренировок спортсмен пробежал ',X:3:2,' Км.'); End; Writeln('Нажмите Enter...'); Readln; end.
program xopow1; uses crt; var a, b, Sek: integer; begin writeln('Введите границы:'); repeat readln(a, b); until b >= a; clrscr; for a := a to b do begin Sek := a * 60; writeln(a, ' мин. = ', sek, ' сек.') end end.
2.
program xopow2; uses crt; Var z:integer; f,x,y:real; Begin clrscr; Writeln; X:=10000; Y:=(x/100)*10; for z:=1 to 7 do Begin X:=x+y; Writeln(Z,' -й день тренировок спортсмен пробежал ',X:3:2,' Км.'); End; Writeln('Нажмите Enter...'); Readln; end.
Только наверно после шаров тоже две запятых...