Предмет: Информатика,
автор: 375196albert
Помогите пожалуйста со 2 или 3 (на паскале). Буду очень благодарен. 8 класс
Приложения:
![](https://files.topotvet.com/i/ed8/ed8a5059051588f7267ca23e7eaa6941.jpg)
Ответы
Автор ответа:
1
var i,k:integer;
begin;
k:=0;
for i:=1 to 6 do
k:=k+i;
writeln(k);
end.
Program Words;
var F, N, R: integer;
begin
write('Введите число букв');
readln(N);
F:=l;
R:=1;
while R<=N do
begin
F:=F*R;
R:=R+1
end;
write (F);
end.
Похожие вопросы
Предмет: Химия,
автор: Apolinarya2006
Предмет: Математика,
автор: homaa675
Предмет: Геометрия,
автор: ahonor832
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: кира253