Есть ответ 👍

Паскаль. нужно составить программу для нахождения цифр трехзначного числа через запятую. например, при вводе мы пишем 123, а на выходе должно получиться 1, 2, 3

295
314
Посмотреть ответы 2

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


// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! begin   readinteger.tostring.tochararray.println(',') end. пример 123 1,2,3 замечание: число не обязано быть трехзначным.

Program n1; const nn=30000; var        m: array [1..nn,1..nn] of integer;       i,j,k,n: integer; begin k: =0; writeln('введите n'); readln(n); writeln('введите массив');   for i: =1 to n do     for j: =1 to n do begin         read(m[i,j]);         if (m[i,j] mod 3 =0) then k: =k+1;     end; writeln(k); end.

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