1. Наперсток предназначен для защиты пальца от проколов во время работы.
2. Соблюдай порядок на своем рабочем месте.
Перед работой проверь исправность инструментов.
Не работай ножницами с ослабленным креплением.
Работай только исправным инструментом: хорошо отрегулированными и заточенными ножницами.
Работай ножницами только на своем рабочем месте.
Следи за движением лезвий во время работы.
Ножницы клади кольцами к себе.
Подавай ножницы кольцами вперед.
Не оставляй ножницы открытыми.
Храни ножницы в чехле лезвиями вниз.
Не играй с ножницами, не подноси ножницы к лицу.
Используй ножницы по назначению.
3. Нельзя втыкать иголки и булавки в одежду, мебель, брать их в рот. До и после работы пересчитывать иголки и булавки. При уколе пальца иглой следует выдавить две-три капли крови и смазать ранку йодом. Ножницы следует хранить в специальном чехле.
var a,n,i,j,s:integer; begin writeln('Введите количество цифр в числе'); readln(n); for i:=1 to n do begin writeln('Введите ',i,' цифру из ',n); readln(a); for j:=1 to n-i do a:=a*10; s:=s+a; end; writeln('Натуральное число: ',s); end.
Тестовое решение
Введите количество цифр в числе 5 Введите 1 цифру из 5 9 Введите 2 цифру из 5 2 Введите 3 цифру из 5 7 Введите 4 цифру из 5 3 Введите 5 цифру из 5 1 Натуральное число: 92731
Решение №2 Если очень надо использовать массив (хотя на мой взгляд совсем не нужно)
//PascalABC.NET (версия 3.1, сборка 1198) var a,n,i,j,s:integer; mas:array[1..10]of integer; begin writeln('Введите количество цифр в числе'); readln(n); for i:=1 to n do begin writeln('Введите ',i,' цифру из ',n); readln(mas[i]); a:=mas[i]; for j:=1 to n-i do a:=a*10; s:=s+a; end; writeln('Натуральное число: ',s); end.
Тестовое решение
Введите количество цифр в числе 5 Введите 1 цифру из 5 5 Введите 2 цифру из 5 4 Введите 3 цифру из 5 3 Введите 4 цифру из 5 2 Введите 5 цифру из 5 2 Натуральное число: 54322
1. Наперсток предназначен для защиты пальца от проколов во время работы.
2. Соблюдай порядок на своем рабочем месте.
Перед работой проверь исправность инструментов.
Не работай ножницами с ослабленным креплением.
Работай только исправным инструментом: хорошо отрегулированными и заточенными ножницами.
Работай ножницами только на своем рабочем месте.
Следи за движением лезвий во время работы.
Ножницы клади кольцами к себе.
Подавай ножницы кольцами вперед.
Не оставляй ножницы открытыми.
Храни ножницы в чехле лезвиями вниз.
Не играй с ножницами, не подноси ножницы к лицу.
Используй ножницы по назначению.
3. Нельзя втыкать иголки и булавки в одежду, мебель, брать их в рот. До и после работы пересчитывать иголки и булавки. При уколе пальца иглой следует выдавить две-три капли крови и смазать ранку йодом. Ножницы следует хранить в специальном чехле.