Предмет:
ИнформатикаАвтор:
cabreravar
x, c, m, n : integer;
begin
write('введите x = ');
readln(x);
writeln('введите начальное и конечное значение для a:');
write('m = ');
readln(m);
write('n = ');
readln(n);
for var a := m to n do begin
c := a*x;
writeln(a, '*', x, '=', c);
end;
end.
Автор:
sonnysheaКратко и понятно.
```code
var x, a, n, k: integer;
begin
write('Введите x = '); readln(x);
write('Введите начальный множ. n = '); readln(n);
write('Введите конченый множ. k = '); readln(k);
for a := n to k do writeln(x,' * ', a, ' = ', (a * x));
end.
```
Автор:
poochieqhwkДобавить свой ответ
Предмет:
ХимияАвтор:
eliseors5mОтветов:
Смотреть
Предмет:
ИнформатикаАвтор:
buttercupОтветов:
Смотреть