Задача 9 Урок 11
Primary tabs
Пользователь вводит последовательно три произвольных целых числа. Заведите три переменных и сохраните эти числа в эти переменные. Пользовательский ввод обрабатывайте в цикле.
Примечание: в одном витке цикла должен быть только 1 readln()
var a,b,c,i:integer; begin for i:=1 to 3 do begin writeln('Vvedite chislo: '); if (i = 1) then readln(a) else if (i = 2) then readln(b) else readln(c); end; writeln('Vvedennie chisla: ',a,' ',b,' ',c); readln(); end.
- Log in to post comments
- 825 reads