Question

Написать таблицу умножения на 5 в паскаль

Answer 1

Ответ:

var a, b, c, d, e, h, n, g, u, o, p: integer;

begin

write ('a = ');

read (a);

b:= a*1;

c:= a*2;

d:= a*3;

e:= a*4;

h:= a*a;

n:= a*6;

g:= a*7;

u:= a*8;

o:= a*9;

p:= a*10;

writeln ('b=', b);

writeln ('c=', c);

writeln ('d=', d);

writeln ('e=', e);

writeln ('h=', h);

writeln ('n=', n);

writeln ('g=', g);

writeln ('u=', u);

writeln ('o=', o);

writeln ('p=', p);

end.

С клавиатуры когда тебе на экране выскочет а= напиши пятёрку)))

Answer 2

Для написания таблицы умножения на 5 в Pascal, можно использовать два вложенных цикла: один для множителя от 1 до 10, а другой для множимого от 1 до 10. Вот пример кода:

pascalCopy code
program MultiplicationTable;

var
  multiplier, multiplicand, result: integer;

begin
  writeln('Таблица умножения на 5:');
  writeln('----------------------');
  
  for multiplicand := 1 to 10 do
  begin
    multiplier := 5;
    result := multiplier * multiplicand;
    writeln(multiplier, ' * ', multiplicand, ' = ', result);
  end;
  
  readln;
end.

Программа выведет таблицу умножения на 5, от 1 до 10:

markdownCopy code
Таблица умножения на 5:
----------------------
5 * 1 = 5
5 * 2 = 10
5 * 3 = 15
5 * 4 = 20
5 * 5 = 25
5 * 6 = 30
5 * 7 = 35
5 * 8 = 40
5 * 9 = 45
5 * 10 = 50

Просто скопируйте этот код в среду разработки Pascal и запустите программу для вывода таблицы умножения на 5.