Одна компания выступила лотерельные билеты трех разрядов для молодых взрослых и стариков номера в билетах лежат в приделах: для молодых от 1 до 100 для взрослых от 101 до 200 для стариков от 201 до 250 с компьютера выбрите случайным образом лотереиный билет в каждом разряде через программу pascalabc

220

250

Посмотреть ответы 2

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

StacyZviozdohkina

Информатика

4,8(90 оценок)

Begin randomize; writeln('для молодых: ',random(100)+1); writeln('для взрослых: ',random(100)+101); writeln('для стариков: ',random(50)+201); end. пример: для молодых: 6 для взрослых: 173 для стариков: 236

dsdg1g

Информатика

4,7(44 оценок)

Попробовал на паскале, только потом увидел, что блок-схему надо, если пригодится: ) var a: real; k,n: integer; begin n: = 0; k: = 0; a: = 0; readln(n); repeat k: = k+1; a: = sqrt(k)+a; until n< > k; writeln(a: 1: 2); end. var a: real; k,n: integer; begin n: = 0; k: = 0; a: = 0; readln(n); while n< > k do begin k: = k+1; a: = sqrt(k)+a; end; writeln(a: 1: 2); end.