Вопрос по информатике:
Ребят помогите задача по информатике 8 класс В Паскале АВС
1)Написать слово осень n-ое кол-во раз.
2)Выведите числа от 20 до 50 в столбик.
3)Вычеслите сумму нечетных чисел от 7 до 41.
4)Вычеслите произведение от 10 до 20 всех чётных чисел.
НАпишите хотя бы на 1 вопрос ответ если знаете .Плиз!
- 04.01.2015 16:30
- Информатика
- remove_red_eye 6396
- thumb_up 39
Ответы и объяснения 1
var n,i:integer ;begin
readln(n);
for i := 1 to n do begin
writeln ('осень');
end;
end.
вот 2 var i:integer ;
begin
for i := 20 to 50 do begin
writeln (i);
end;
end. вот 3 var i,n:integer ;
begin
for i := 7 to 41 do begin
if (i mod 20) then
n:=n+i;
end;
writeln (n);
end. и 4 var i,n:integer ;
begin
n:=1;
for i := 10 to 20 do begin
if (i mod 2=0) then
n:=n*i;
end;
writeln (n);
end.
- 05.01.2015 07:37
- thumb_up 26
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.