Форум на PC Mania » Виж темата - Помощ за една задача на Pascal




ФОРУМ » Общ форум

търсене регистрация чат помощ правила влизане в сайта

Нова тема

Отговор

принтирай

Автор

Съобщение

Audiofly

Регистриран на:
17 Апр 2005 15:35
Мнения: 364

Заглавие: Помощ за една задача на Pascal

Публикувано на: 20 Фев 2008 19:55

Все някой в тоя форум би трябвало да разбира нещо от Pascal, поставена ми е задача да направя програма на Pascal, която извежда таблицата за умножение до 10. Нямам си изобщо никаква идея как става това, така че се надявам на вас. Благодаря предварително

___________________________________

Computer games don't affect kids; I mean if Pac-Man affected us as kids, we'd all be running around in darkened rooms, munching magic pills and listening to repetitive electronic music.

Аltеr Ego

Регистриран на:
17 Авг 2001 19:43
Мнения: 146

Заглавие: Re: Помощ за една задача на Pascal

Публикувано на: 20 Фев 2008 21:50

Код:

var     i, j: integer;
begin
  for i := 1 to 10 do
    for j := 1 to 10 do
      writeln (i, ' x ', j, ' = ', j * i);
  readln;
end.

Цитат:

....
2 x 7 = 14
2 x 8 = 16
2 x 9 = 18
2 x 10 = 20
3 x 1 = 3
3 x 2 = 6
3 x 3 = 9
3 x 4 = 12
3 x 5 = 15
3 x 6 = 18
......

Ако съм те разбрал правилно.