Напечатать таблицу умножения для числа 12

@ilnaz9716 · Регистрация: 02.11.2015

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

Cоставить программу(в виде блок-схемы) для решения задачи:Напечатать таблицу умножения для числа 12.

@Кирилл_В · 03.11.2015, 20:34

ilnaz9716, держи

Pascal

var i:integer;
begin
  for  i:=1 to 9 do
   begin
    Writeln(12,' * ',i,' = ',12*i,'':5);
   end;
end.

@rfvhb · 04.04.2016, 18:51

Pascal

begin
  var A := ReadLnReal('A =');
  var B := ReadLnReal('B =');
  var x := -1.2;
  repeat
    WriteLnFormat('y({0,4:0.0}) = {1,10:0.00000}', x, (x > 0 ? A*x*x + B*x : 5*A*x+sin(B*x)));
    x += 0.2;
  until x > 1.2;
end.

@Cyborg Drone · 05.04.2016, 02:17

Не по теме:

rfvhb, это - общий раздел паскаля. Если пишете ответ с применением конкретного диалекта паскаля, то обязательно это указывайте.

Внимание! Программа от rfvhb написана на Pascal ABC.NET и годится только для этого диалекта паскаля.

Напечатать таблицу умножения для числа 12

Решение

Решение

@ilnaz9716 0 / 0 / 0 Регистрация: 02.11.2015 Сообщений: 4
		1
	Напечатать таблицу умножения для числа 12 02.11.2015, 12:19. Показов 3418. Ответов 3 Метки нет (Все метки) Cоставить программу(в виде блок-схемы) для решения задачи:Напечатать таблицу умножения для числа 12. 0

@Cyborg Drone Модератор 9871 / 5239 / 3306 Регистрация: 17.08.2012 Сообщений: 16,007
	05.04.2016, 02:17	4
	Не по теме: rfvhb, это - общий раздел паскаля. Если пишете ответ с применением конкретного диалекта паскаля, то обязательно это указывайте. Внимание! Программа от rfvhb написана на Pascal ABC.NET и годится только для этого диалекта паскаля. 0