Вопрос по информатике:
РЕБЯТ ПОМОГИТЕ ПОЖАЛУЙСТА УМОЛЯЯЯЯЮ!!!!!!!!!!!!!
3. Напишите общий вид оператора «Цикл с условием».
5. Точно и четко сформулируйте условие задачи, которая решается в данной программе:
Uses Crt;
Var N : Integer; S : Byte;
Begin
Write('Введите натуральное число: '); ReadLn(N);
S := 0;
While N <> 0 Do
Begin
S := S + N mod 10; N := N Div 10
End;
WriteLn('S = ', S : 4);
End.
6. Создайте программу на языке Turbo Pascal.
1) Дано трехзначное число. Найти сумму цифр этого числа.
2) Найти четырехзначное число, которое при деление на 133 дает остаток 125.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 14.12.2017 22:12
- Информатика
- remove_red_eye 6259
- thumb_up 46
Ответы и объяснения 1
for i:= to do
5.
6.1.
program z1;
uses crt;
var x,a,b,c,s:integer;
begin
writeln('Введите 3-значное число:');
readln(x);
a:=x div 100;
b:=x mod 100 div 10;
c:= x mod 10;
s:=a+b+c;
writeln(s);
end.
6.2.
program z1;
uses crt;
var x,a,b,c,s:integer;
begin
- 15.12.2017 07:56
- thumb_up 9
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.