Вопрос по информатике:
Var n,a,b,c,d,f:integer;
begin
write('Введите трёхзначное число n=',n);
a:= n del 100 ;
b:= n mod 10;
c:= n del 10;
a+b+c=s;
if(s>=10)(s<=99);
else(s);
then
f:=s del 10;
d:=s mod 10;
writeln('Сумма',s);
end. Помогите, Паскаль не знаю, выбивают ошибку в этой области a:= n del 100 ;
b:= n mod 10;
c:= n del 10;
- 03.09.2016 13:05
- Информатика
- remove_red_eye 16143
- thumb_up 6
Ответы и объяснения 1
1) del ? что это? может ты должен использовать div? =)
2) a+b+c=s; сразу несколько косяков, во 1-х так не пишут, а пишут s:=a+b+c;, во 2-х у тебя переменная s не определена в Var
3) if(s>=10)(s<=99);
else(s);
then
это вообще печально, так не пишут, запись должна написана
так if(s>=10) and (s<=99) then
....
else(s)
ответ у меня не получился, если скинешь в лс задачу, я помогу тебе ее решить! Удачи =)
- 04.09.2016 20:16
- thumb_up 11
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.