Напечатать таблицу умножения на заданную цифру

@Daria_shka · Регистрация: 28.04.2010

Author24 — интернет-сервис помощи студентам

Напишите пжл, программу ктр. с клавиатуры запрашивается любая цифра от 2 до 9, а затем компьютер печатает таблицу умножения на эту цифру.

@Snoopy · 28.04.2010, 19:01

Pascal

uses crt;
var x,i,n:byte;
begin
ClrScr;
repeat
Writeln('Vvedite zifru: ');
Readln(x);
until x in [1..9];
Writeln('Vvedite n=');
Readln(n);
for i:=1 to n do
 Writeln(x*i);
Readln;
end.

@Puporev · 28.04.2010, 19:04

красивше типа так

Pascal

1	Writeln(x,'',i,'=',xi);

Напечатать таблицу умножения на заданную цифру

Решение

Решение

@Daria_shka 0 / 0 / 0 Регистрация: 28.04.2010 Сообщений: 12
		1
	Напечатать таблицу умножения на заданную цифру 28.04.2010, 18:52. Показов 4793. Ответов 2 Метки нет (Все метки) Напишите пжл, программу ктр. с клавиатуры запрашивается любая цифра от 2 до 9, а затем компьютер печатает таблицу умножения на эту цифру. 0

	28.04.2010, 19:04