Есть ответ 👍

Составьте 2 или 4 загадки на тему "безопастный интернет".с ответами. заранее

280
397
Посмотреть ответы 1

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


1 .

uses crt; var a, b : real; beginreadln (a, b); writeln (a/b); writeln (frac(a/b)); writeln (int(a/b)); writeln (round(a/b)); readkey; end.

 

2 .

uses crt; var a: integer; st, st1, st2, st3: string; beginreadln (a); str (a, st); st1: =st[3]; st2: = st[2]; st3: = st[1]; st: = st1+st2+st3; writeln (st); readkey; end.

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