По диаграмме среднего детей 7 класса создайте интерфеис приложение

var a: string;

begin

write ('Введите слово: '); read (a);

writeln ('Именительный падеж: ',copy(a,1,length(a)));

writeln ('Родительный падеж: ',copy(a,1,length(a)-1),'ы');

writeln ('Дательный падеж: ',copy(a,1,length(a)-1),'е');

writeln ('Винительный падеж: ',copy(a,1,length(a)-1),'у');

writeln ('Творительный падеж: ',copy(a,1,length(a)-1),'ой');

writeln ('Предложный падеж: ',copy(a,1,length(a)-1),'е');

end.

Основной момент, это удаление окончания путем копирования слова в строке a начиная с первого символа, до длины слова минус 1 символ.

Объяснение:

Відповідь:

Пояснення:

//Реализация задачи №1 "A+B" на C

#include < stdio.h >

long a,b;

int main(){

freopen("input.txt","r",stdin);

freopen("output.txt","w",stdout);

scanf("%ld%ld",&a,&b);

printf("%ld",a+b);

return 0;

}  

7

{Реализация задачи №1 "A+B" на Pascal}

var a, b : longint;

begin

assign(input, 'input.txt'); reset(input);

assign(output, 'output.txt'); rewrite(output);

read(a, b);

write(a + b);

end.

//Реализация задачи №1 "A+B" на Java

import java.util.*;

import java.io.*;

public class Main{ //имя класса должно быть Main

public static void main(String[] argv) throws IOException{

new Main().run();

}

PrintWriter pw;

Scanner sc;

public void run() throws IOException{

sc = new Scanner(new File("input.txt"));

int a=sc.nextInt(), b=sc.nextInt();

pw = new PrintWriter(new File("output.txt"));

pw.print(a+b);

pw.close();

}

}

'Реализация задачи №1 "А+В" на Basic

open "input.txt" for input as #1

open "output.txt" for output as #2

input #1,a#,b#

print #2,a#+b#

close #1

close #2