Регистрация
Поля34232
12.06.2023 03:28
Информатика
Есть ответ 👍

Составить программу которая выводит таблицу умножение на любое число 8 класс

259
478
Посмотреть ответы 2

Ответы на вопрос:

lukycuk
lukycuk
4,5(15 оценок)
Var     a: real;     i: byte; begin write('введите число: '); readln(a); for i: = 1 to 9 do       writeln(a,'*',i,' = ',a*i); end.
Ulamaishka567
Ulamaishka567
4,8(29 оценок)

ответ:

uses crt;

var s,s1,s2: string;

begin

s: ='"юрий борисович пупорев""иван иванович иванов""петр петрович петров""арам арамович арамов"';

writeln(s);

s2: ='';

while pos('"',s)> 0 do

begin

  delete(s,1,1);

  s2: =s[1]+'.';

  delete(s,1,pos(' ',s));

  s2: =s2+s[1]+'.';

  delete(s,1,pos(' ',s));

  s1: =copy(s,1,pos('"',s)-1);

  insert(s1+' ',s2,1);

  delete(s,1,pos('"',s));

  writeln(s2);

end;

end.

объяснение:

Популярно: Информатика