Урок 11 задача 9
Primary tabs
Пользователь вводит последовательно три произвольных целых числа. Заведите три переменных и сохраните эти числа в эти переменные. Пользовательский ввод обрабатывайте в цикле.
Примечание: в одном витке цикла должен быть только 1 readln()
Первый способ var check,znach1,znach2, znach3: integer; begin check:=0; while check < 3 do begin write('vvedite chislo: '); check:=check+1; if (check = 1)then readln(znach1) else if (check = 2)then readln(znach2) else readln(znach3); end; writeln(znach1,' ',znach2,' ',znach3); readln(); end. второй способ var check,znach1,znach2, znach3: integer; begin check:=0; znach1:=0; znach2:=0; while check < 3 do begin write('vvedite chislo: ');readln(znach1); check:=check+1; znach3:=znach2; znach2:=znach1; end; writeln(znach3,' ',znach2,' ',znach1); readln(); end.
- Log in to post comments
- 1061 reads
vedro-compota
Wed, 09/08/2021 - 20:21
Permalink
решение засчитано
решение засчитано
_____________
матфак вгу и остальная классика =)