Я, в основном, программы на С++ пишу, но из школы про Паскаль кое-что помню (в смысле, попытаюсь написать на Паскале).
Program A1;
var a,b,c,i:integer;
begin
write('Enter the a: ');
read(a);
writeln('Enter the b: ');
read(b);
с:=0;
for i:=1 to a Do
c:=c+b;
writeln('a*b=',c:5:0);
end.
Объясняю (начинаю сразу с цикла for): что значит произведение двух натуральных чисел а и b - это означает, сложить b с самим собой по а раз (можно и наоборот). Например, a=5, b=3. Переменную с=0 будем складывать с b.
''' Вводятся четыре числа: xa, ya: координаты ферзя xb, yb: координаты другой фигуры
Координаты - целые числа в интервале от 1 до 8.
Вывод - булево значение: сможет ли ферзь побить фигуру за 1 ход. ''' def hits(xa, ya, xb, yb) -> bool: ''' Проверка аргументов. ''' args = (xa, ya, xb, yb) if any([not 1 <= z <= 8 for z in args]): raise ValueError("Неверные координаты!")
''' На одной прямой. ''' if xa == xb or ya == yb: return True
''' Северо-западная диагональ. ''' x_nw, y_nw = xa, ya while x_nw > 1 and y_nw > 1: x_nw -= 1 y_nw -= 1 if x_nw == xb and y_nw == yb: return True
''' Юго-восточная диагональ. ''' x_se, y_se = xa, ya while x_se < 8 and y_se < 8: x_se += 1 y_se += 1 if x_se == xb and y_se == yb: return True
''' Юго-западная диагональ. ''' x_sw, y_sw = xa, ya while x_sw > 1 and y_se < 8: x_sw -= 1 y_sw += 1 if x_sw == xb and y_sw == yb: return True
''' Северо-восточная диагональ. ''' x_ne, y_ne = xa, ya while x_ne < 8 and y_se > 1: x_ne += 1 y_ne -= 1 if x_ne == xb and y_ne == yb: return True
return False # если не бьет
inp = [int(x) for x in input().split()] if hits(*inp): print('YES') else: print('NO')
Я, в основном, программы на С++ пишу, но из школы про Паскаль кое-что помню (в смысле, попытаюсь написать на Паскале).
Program A1;
var a,b,c,i:integer;
begin
write('Enter the a: ');
read(a);
writeln('Enter the b: ');
read(b);
с:=0;
for i:=1 to a Do
c:=c+b;
writeln('a*b=',c:5:0);
end.
Объясняю (начинаю сразу с цикла for): что значит произведение двух натуральных чисел а и b - это означает, сложить b с самим собой по а раз (можно и наоборот). Например, a=5, b=3. Переменную с=0 будем складывать с b.
i=1 c=5+0;
i=2 c=5+5;
i=3 c=10+5; //c=15
Вот и есть ответ: 5*3=15.