var i,z,y,x: integer; // объявление переменных begin // начало программы writeln('Введите числа: '); // Вывод сообщения readln(x,y); // Ввод чисел х и у с клавиатуры while i <> y do // Повторять цикл пока i не будет равно y begin // Вход в цикл z:=z+x; // z = z + x (при первом шаге получается 0 = 0 + х) i:=i+1; // Увеличиваем счетчик цикла на 1 end; // Выход из цикла write(z); // Вывод z (произведение х и у) end. // Конец программы
Объяснение:
рлллолшчллы пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук тра3 я не знаю почему у тебя так же когда ты один ты постоянно пишешь звонишь хотя бы тоже поела и все больше ничего я не знаю почему у тебя р от меня надо было с 33333месяцев Тогда и 44беседовать