Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var i, n : integer;
a, d : real
s: array[1..20] of real;
begin
write('введите n-');
readln (n);
write('введите а=');
readln(a);
write('введите d=');
readln(d);
s[1]: =a;
for i: =2 to n do
s[i]: =a+d;
write('арифметическая прогрессия: ');
for i: =1 to n do
write(s[i]);
end.
qbasic
screen 7
input x
input y
input c
s=x+y/2*c
print "x+y/2*c="; s
end
х - любое число
х/х + 4 = 5
х+ 5 - х=5
разбойников обозначу буквой р
купцов буквой к
р отвозит р возвращается, берет к возвращается, берет к возвращается, берет р возвращается, берет к и сам остается))
Популярные вопросы