Помогите решить. паскаль1) найти сумму целых двузначных чисел.

2) найти произведение целых чисел от 3 до n

Question

Информатика

Вильгельмина

8 сентября, 23:20

Помогите решить. паскаль1) найти сумму целых двузначных чисел.

2) найти произведение целых чисел от 3 до n

+2

Ответы (1)

Знаете ответ на вопрос?

Агриппична · Answer 1

1) var a, b, s : real;

begin

readln (a, b) ;

s:=a+b;

write (s) ;

end.

2) несовсем понятно

var a, n, i:integer;

begin

readln (n) ;

for i:=1 to n do

begin

a:=3*i;

write (a) ;

end; end.

Помогите решить. паскаль1) найти сумму целых двузначных чисел.2) найти произведение целых чисел от 3 до n

Помогите решить. паскаль1) найти сумму целых двузначных чисел.

2) найти произведение целых чисел от 3 до n